[gforth] / gforth / ds2texi.fs  

gforth: gforth/ds2texi.fs

Diff for /gforth/ds2texi.fs between version 1.25 and 1.26

version 1.25, Sat Sep 14 08:20:18 2002 UTC version 1.26, Sun Jan 26 20:56:37 2003 UTC
Line 203 
Line 203 
   
 : compare-ci ( addr1 u1 addr2 u2 -- n )  : compare-ci ( addr1 u1 addr2 u2 -- n )
     \ case insensitive string compare      \ case insensitive string compare
       \ !! works correctly only for comparing for equality
     2 pick swap -      2 pick swap -
     ?dup-0=-if      ?dup-0=-if
         capscomp          capscomp

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

Powered by ViewCVS 1.0-dev 		(Powered by ViewCVS)

ViewCVS and CVS Help