![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to extend.fs CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [gforth] / gforth|
Return to extend.fs CVS log | Up to [gforth] / gforth |
| version 1.4, 1994/07/21 10:52:39 | version 1.5, 1994/08/25 15:25:22 |
|---|---|
| Line 14 decimal | Line 14 decimal |
| (constant) , ; | (constant) , ; |
| \ !! 2value | \ !! 2value |
| : 2>r postpone swap postpone >r postpone >r ; immediate restrict | |
| : 2r> postpone r> postpone r> postpone swap ; immediate restrict | |
| : 2r@ postpone 2r> postpone 2dup postpone 2>r ; immediate restrict | |
| : 2Literal swap postpone Literal postpone Literal ; | : 2Literal swap postpone Literal postpone Literal ; |
| immediate restrict | immediate restrict |