[gforth] / gforth / utf-8.fs  

gforth: gforth/utf-8.fs

Diff for /gforth/utf-8.fs between version 1.22 and 1.23

version 1.22, Mon Feb 20 08:22:28 2006 UTC version 1.23, Mon May 1 09:45:56 2006 UTC
Line 162 
Line 162 
     s" UTF-8" search nip nip      s" UTF-8" search nip nip
     IF  set-encoding-utf-8  ELSE  set-encoding-fixed-width  THEN ;      IF  set-encoding-utf-8  ELSE  set-encoding-fixed-width  THEN ;
   
 ' utf-8-cold INIT8 chained  :noname ( -- )
       defers 'cold
       utf-8-cold
   ; is 'cold
   
 utf-8-cold  utf-8-cold

Generate output suitable for use with a patch program
Legend:
Removed from v.1.22  
changed lines
  Added in v.1.23
CVS Admin

Powered by ViewCVS 1.0-dev 		(Powered by ViewCVS)

ViewCVS and CVS Help