forth: take advantage of the new [] mode
这个提交包含在:
父节点
684cb028ff
当前提交
f40c14715e
二进制文件未显示。
@ -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! )
|
||||
|
正在加载...
在新工单中引用
屏蔽一个用户