|
version 1.2, 1996/08/21 14:58:44
|
version 1.3, 1996/08/26 10:07:21
|
|
Line 44 interpret/compile: ." ( compilation 'ccc
|
Line 44 interpret/compile: ." ( compilation 'ccc
|
| |
|
| \ DOES> 17mar93py |
\ DOES> 17mar93py |
| |
|
| :noname align dodoes, here !does ] |
:noname |
| |
align dodoes, here !does ] |
| defstart :-hook ; |
defstart :-hook ; |
| :noname ;-hook postpone (does>) ?struc dodoes, |
:noname |
| |
;-hook postpone (does>) ?struc dodoes, |
| defstart :-hook ; |
defstart :-hook ; |
| interpret/compile: DOES> ( compilation colon-sys1 -- colon-sys2 ; run-time nest-sys -- ) \ core does |
interpret/compile: DOES> ( compilation colon-sys1 -- colon-sys2 ; run-time nest-sys -- ) \ core does |
| |
|
| |
|
![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to special.fs CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [gforth] / gforth