Return to extend.fs CVS log | Up to [gforth] / gforth |
version 1.20, 1997/02/06 21:23:00 | version 1.21, 1997/02/09 21:51:39 |
---|---|
Line 30 decimal | Line 30 decimal |
\ VALUE 2>R 2R> 2R@ 17may93jaw | \ VALUE 2>R 2R> 2R@ 17may93jaw |
: value ( w "name" -- ) \ core-ext | |
(constant) , ; | |
\ !! 2value | \ !! 2value |
: 2Literal ( compilation w1 w2 -- ; run-time -- w1 w2 ) \ double two-literal | : 2Literal ( compilation w1 w2 -- ; run-time -- w1 w2 ) \ double two-literal |