diff --git a/emul/forth/z80c.bin b/emul/forth/z80c.bin index 785a200..2685946 100644 Binary files a/emul/forth/z80c.bin and b/emul/forth/z80c.bin differ diff --git a/forth/icore.fs b/forth/icore.fs index 713babf..be38c92 100644 --- a/forth/icore.fs +++ b/forth/icore.fs @@ -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! )