collapseos/blk/301

lblexec BSET PC ORG @ 0x34 + ! ( execute. DE -> wordref )
    ( We don't apply BIN( reliably on stable ABI stuff, we
      might need to adjust addr. Ugly, but well... )
    BIN( @ [IF]
        A XORr, D ORr, IFZ, D BIN( @ 256 / LDrn, THEN,
    [THEN]
    LDA(DE), DE INCss,
    A ORr, IFZ, EXDEHL, JP(HL), THEN,
    A DECr, JRZ, L1 FWR ( compiled B303 )
    ( cell or does. push PFA ) DE PUSHqq,
    A DECr, IFZ, JPNEXT, THEN, ( cell )
    ( continue to does, B302 )
z80: use named labels for boot routines The usage of numerotated labels for this was becoming severly confusing. 2020-06-18 21:16:40 +10:00			`lblexec BSET PC ORG @ 0x34 + ! ( execute. DE -> wordref )`
boot: apply BIN( to stray stable ABI references With cross compiling and IMMEDIATE words, things get icky with stable ABI references. For the same reason that EXIT, (br) and (br?) need to stay at stable offsets, these word references will not have BIN( properly applied at Inner core xcomp. The solution for now is to adjust during EXECUTE, which is ugly and inefficient, but I don't see a better solution right now. 2020-04-28 22:52:47 +10:00			`( We don't apply BIN( reliably on stable ABI stuff, we`
			`might need to adjust addr. Ugly, but well... )`
			`BIN( @ [IF]`
z80: small optimization in execute I had more ambitious goals, but I backed out of it: not worth it. This small optimization is an easy picking though. 2020-06-17 06:37:21 +10:00			`A XORr, D ORr, IFZ, D BIN( @ 256 / LDrn, THEN,`
boot: apply BIN( to stray stable ABI references With cross compiling and IMMEDIATE words, things get icky with stable ABI references. For the same reason that EXIT, (br) and (br?) need to stay at stable offsets, these word references will not have BIN( properly applied at Inner core xcomp. The solution for now is to adjust during EXECUTE, which is ugly and inefficient, but I don't see a better solution right now. 2020-04-28 22:52:47 +10:00			`[THEN]`
Make word routines into word types Instead of having wordref point to core word routines, I made them into word 4 word types. It liberates space into the stable ABI and should make porting to other arches easier. I'm also thinking of combining word type with the namelen field for precious bytes saving, but not now... 2020-06-18 11:41:01 +10:00			`LDA(DE), DE INCss,`
			`A ORr, IFZ, EXDEHL, JP(HL), THEN,`
			`A DECr, JRZ, L1 FWR ( compiled B303 )`
			`( cell or does. push PFA ) DE PUSHqq,`
			`A DECr, IFZ, JPNEXT, THEN, ( cell )`
			`( continue to does, B302 )`