--- gforth/extend.fs 1994/04/20 17:12:02 1.2 +++ gforth/extend.fs 1994/05/07 14:55:48 1.3 @@ -10,7 +10,9 @@ decimal \ VALUE 2>R 2R> 2R@ 17may93jaw -: value ( n -- ) (constant) , ; +: value ( n -- ) + (constant) , ; +\ !! 2value : 2>r postpone >r postpone >r ; immediate restrict : 2r> postpone r> postpone r> ; immediate restrict