![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to cond.fs CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [gforth] / gforth / kernel|
Return to cond.fs CVS log | Up to [gforth] / gforth / kernel |
| version 1.1, 1997/05/21 20:40:14 | version 1.2, 1998/10/10 10:28:36 |
|---|---|
| Line 91 variable backedge-locals | Line 91 variable backedge-locals |
| dup cs-item? ; | dup cs-item? ; |
| : cs-push-part ( -- list addr ) | : cs-push-part ( -- list addr ) |
| locals-list @ here ; | locals-list wordlist-id @ here ; |
| : cs-push-orig ( -- orig ) | : cs-push-orig ( -- orig ) |
| cs-push-part dead-code @ | cs-push-part dead-code @ |