[gforth] / gforth / utf-8.fs  

gforth: gforth/utf-8.fs

Diff for /gforth/utf-8.fs between version 1.14 and 1.15

version 1.14, Mon Jan 10 10:30:55 2005 UTC version 1.15, Wed Jan 12 21:21:53 2005 UTC
Line 140 
Line 140 
     ['] -u8trailing-garbage is -trailing-garbage      ['] -u8trailing-garbage is -trailing-garbage
 ;  ;
   
   : utf-8-cold ( -- )
       s" LANG" getenv s" .UTF-8" search nip nip
       IF  set-encoding-utf-8  ELSE  set-encoding-fixed-width  THEN ;
   
   ' utf-8-cold INIT8 chained
   
   utf-8-cold

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

Powered by ViewCVS 1.0-dev 		(Powered by ViewCVS)

ViewCVS and CVS Help