![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to stuff.fs CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [gforth] / gforth|
Return to stuff.fs CVS log | Up to [gforth] / gforth |
| version 1.38, 2004/11/28 20:35:06 | version 1.39, 2004/12/01 10:02:59 |
|---|---|
| Line 289 AUser CSP | Line 289 AUser CSP |
| \ defer stuff | \ defer stuff |
| [ifundef] defer@ : defer@ >body @ ; [then] | |
| :noname ' defer@ ; | :noname ' defer@ ; |
| :noname postpone ['] postpone defer@ ; | :noname postpone ['] postpone defer@ ; |
| interpret/compile: action-of ( interpretation "name" -- xt; compilation "name" -- ; run-time -- xt ) \ gforth | interpret/compile: action-of ( interpretation "name" -- xt; compilation "name" -- ; run-time -- xt ) \ gforth |