![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to other.fs CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [gforth] / gforth / test|
Return to other.fs CVS log | Up to [gforth] / gforth / test |
| version 1.18, 2000/09/23 15:47:12 | version 1.21, 2003/01/06 11:18:59 |
|---|---|
| Line 72 throw \ if the TOS is not 0, throw an er | Line 72 throw \ if the TOS is not 0, throw an er |
| \ look for primitives | \ look for primitives |
| ' + look 0= throw ( nt ) | ' + xt>threaded threaded>name dup 0= throw ( nt ) |
| s" +" find-name <> throw | s" +" find-name <> throw |
| \ represent | \ represent |