![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to ds2texi.fs CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [gforth] / gforth|
Return to ds2texi.fs CVS log | Up to [gforth] / gforth |
| version 1.25, 2002/09/14 08:20:18 | version 1.26, 2003/01/26 20:56:37 |
|---|---|
| Line 203 create docline doclinelength chars allot | Line 203 create docline doclinelength chars allot |
| : 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 |