diff --git a/blk/086 b/blk/086 index a5b9cc5..745db83 100644 --- a/blk/086 +++ b/blk/086 @@ -7,5 +7,10 @@ compiledWord. Also note that word routines references in wordrefs are 1b. This means that all word routine reference must live below -0x100 in boot binary. This is why numberWord and addrWord are -squeezed where they are. +0x100 in boot binary. + + + + + + diff --git a/blk/286 b/blk/286 index 230fbf9..7d05331 100644 --- a/blk/286 +++ b/blk/286 @@ -3,9 +3,9 @@ CODE 2>R ( 0xa9 ) 17 BCALL, ( 17 == pushRS ) EXDEHL, 17 BCALL, ;CODE NOP, NOP, NOP, CODE (n) ( 0xbf, number literal ) - ( PF means nothing and the actual number is placed next to - the (n) reference in the compiled word list. What we need - to do to fetch that number is to play with the IP. ) + ( Literal value to push to stack is next to (n) reference + in the atom list. That is where IP is currently pointing. + Read, push, then advance IP. ) E 0 IY+ LDrIXY, D 1 IY+ LDrIXY, IY INCss, diff --git a/blk/287 b/blk/287 index b6c0078..bbaa564 100644 --- a/blk/287 +++ b/blk/287 @@ -1,7 +1,7 @@ CODE (s) ( 0xd4, string literal ) ( Like (n) but instead of being followed by a 2 bytes - number, it's followed by a null-terminated string. When - called, puts the string's address on PS ) + number, it's followed by a string. When called, puts the + string's address on PS ) IY PUSHqq, HL POPqq, ( <-- IP ) E (HL) LDrr, D 0 LDrn, DE INCss,