collapseos/blk/301

L3 BSET PC ORG @ 0x34 + ! ( execute )
    EXDEHL, ( HL now points to wordref )
    ( We don't apply BIN( reliably on stable ABI stuff, we
      might need to adjust addr. Ugly, but well... )
    BIN( @ [IF]
        A XORr, H ORr, IFZ, H BIN( @ 256 / LDrn, THEN,
    [THEN]
    E (HL) LDrr,
    D BIN( @ 256 / LDrn,
    EXDEHL,
    ( HL points to code pointer )
    DE INCss,
    ( DE points to PFA )
    JP(HL),
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			`L3 BSET PC ORG @ 0x34 + ! ( execute )`
			`EXDEHL, ( HL now points to wordref )`
			`( We don't apply BIN( reliably on stable ABI stuff, we`
			`might need to adjust addr. Ugly, but well... )`
			`BIN( @ [IF]`
Make BIN( offsetted binaries closer to working at all I have a working offset-by-0x100 stage0 now. 2020-04-29 11:12:52 +10:00			`A XORr, H ORr, IFZ, H 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]`
Copy boot.z80 to blkfs 2020-04-23 11:19:12 +10:00			`E (HL) LDrr,`
z80a: add BIN( parameter Will be useful for assembling binaries for the TRS-80 which can't start at addr 0. 2020-04-28 05:04:37 +10:00			`D BIN( @ 256 / LDrn,`
Copy boot.z80 to blkfs 2020-04-23 11:19:12 +10:00			`EXDEHL,`
			`( HL points to code pointer )`
			`DE INCss,`
			`( DE points to PFA )`
			`JP(HL),`

VE: add 't' This is the first commit I do entirely in VE. It's a habit I'm planning on taking as it helps a lot to find usability issues. 2020-06-12 08:12:01 +10:00