forth: take advantage of the new [] mode

This commit is contained in:
Virgil Dupras 2020-03-27 15:33:04 -04:00
부모 684cb028ff
커밋 f40c14715e
2개의 변경된 파일10개의 추가작업 그리고 2개의 파일을 삭제

Binary file not shown.

파일 보기

@ -29,13 +29,21 @@
This means, of course, that any word compiling a _c word
can't be executed immediately.
Also note that because of that "_c" mechanism, it might
take two rounds of bootstrapping before the compiled
z80c.bin file is "stabilized". That's because the 2nd time
around, the recorded offset will have changed.
)
: _c
['] ROT
[
' ROT
6 - ( header )
['] _bend
' _bend
- ( our offset )
LITN
]
' ( get word )
-^ ( apply offset )
, ( write! )