![[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.47, 2005/12/31 15:46:10 | version 1.48, 2006/01/28 17:55:32 |
|---|---|
| Line 333 interpret/compile: what's ( interpretati | Line 333 interpret/compile: what's ( interpretati |
| emit | emit |
| loop ; | loop ; |
| \ w@ and l@ | |
| [ifdef] uw@ | |
| ' uw@ alias w@ ( addr -- u ) | |
| ' ul@ alias l@ ( addr -- u ) | |
| \ ' sw@ alias <w@ ( addr -- n ) \ Open Firmware name | |
| [then] |