collapseos/blk/301

lblexec BSET L1 FSET ( B299 ) L2 FSET ( B298 )
    ( 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: remove remaining indirections in execute calls We now have a stable ABI that is pretty cleared up... 2020-06-18 21:50:20 +10:00			`lblexec BSET L1 FSET ( B299 ) L2 FSET ( B298 )`
			`( 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 )`