Return to prims2x0.6.2.fs CVS log | Up to [gforth] / gforth |
version 1.2, 2008/11/01 22:19:30 | version 1.3, 2009/01/18 18:41:55 |
---|---|
Line 1191 variable tail-nextp2 \ xt to execute for | Line 1191 variable tail-nextp2 \ xt to execute for |
stores ; | stores ; |
: output-combined-tail ( -- ) | : output-combined-tail ( -- ) |
part-output-c-tail | |
in-part @ >r in-part off | in-part @ >r in-part off |
part-output-c-tail | |
combined ['] output-c-tail-no-stores prim-context | combined ['] output-c-tail-no-stores prim-context |
r> in-part ! ; | r> in-part ! ; |