izaya/collapseos
1
0
Fork 0
mirror of https://github.com/hsoft/collapseos.git synced 2024-11-27 22:28:05 +11:00
Code Issues Releases Wiki Activity
878df2d53b
collapseos/blk/301

16 lines
413 B
Plaintext
Raw Normal View History

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),
Reference in New Issue Copy Permalink