collapseos/emul/xcomp.fs

0xe800 CONSTANT RAMSTART
0xf000 CONSTANT RS_ADDR
212 LOAD  ( z80 assembler )
262 LOAD  ( xcomp )
: CODE XCODE ;
: IMMEDIATE XIMM ;
: (entry) (xentry) ;
: : [ ' X: , ] ;

CURRENT @ XCURRENT !

H@ 256 /MOD 2 PC! 2 PC!
282 LOAD  ( boot.z80 )
393 LOAD  ( icore )
(entry) _
( Update LATEST )
PC ORG @ 8 + !
," CURRENT @ HERE ! "
," : (emit) 0 PC! ; CURRENT @ 83 RAM+ ! "
," : KEY 0 PC@ ; "
422 470 XPACKR
," ' KEY 12 RAM+ ! "
H@ 256 /MOD 2 PC! 2 PC!
Move icore to blkfs The way is clear for complete stage1 bootstrapping on the RC2014 target! 2020-04-24 05:14:14 +10:00			`0xe800 CONSTANT RAMSTART`
			`0xf000 CONSTANT RS_ADDR`
			`212 LOAD ( z80 assembler )`
Use blk's boot.z80 2020-04-23 11:49:44 +10:00			`262 LOAD ( xcomp )`
xcomp: don't automatically shadow core words 2020-04-09 23:43:48 +10:00			`: CODE XCODE ;`
			`: IMMEDIATE XIMM ;`
Avoid using (xentry) outside xcomp config 2020-04-24 02:09:31 +10:00			`: (entry) (xentry) ;`
xcomp: don't automatically shadow core words 2020-04-09 23:43:48 +10:00			`: : [ ' X: , ] ;`

Add xcomp unit for cross compilation Memory mapping is a dead end too, solution has to be at a higher level. xcomp is my new approach. 2020-04-09 22:23:53 +10:00			`CURRENT @ XCURRENT !`
Add CURRENT* and simplify xcomp 2020-04-10 02:01:08 +10:00
			`H@ 256 /MOD 2 PC! 2 PC!`
Use blk's boot.z80 2020-04-23 11:49:44 +10:00			`282 LOAD ( boot.z80 )`
Move icore to blkfs The way is clear for complete stage1 bootstrapping on the RC2014 target! 2020-04-24 05:14:14 +10:00			`393 LOAD ( icore )`
			`(entry) _`
Update z80c.bin's LATEST during xcomp instead of using slatest 2020-04-26 12:02:44 +10:00			`( Update LATEST )`
xcomp: remove XOFF and use ORG and BIN( instead 2020-04-28 23:15:17 +10:00			`PC ORG @ 8 + !`
emul: bootstrap to stage2 from within Collapse OS! Big bootstrapping change which greatly reduces the role of the modern operating system in the bootstrapping process. 2020-04-27 00:15:35 +10:00			`," CURRENT @ HERE ! "`
Add layer of indirection to EMIT This would allow things like temporary giving control to the CL line on the TRS-80. For example... A very far fetched example. Not at all the only raison d'etre* of the layer... 2020-05-02 10:05:15 +10:00			`," : (emit) 0 PC! ; CURRENT @ 83 RAM+ ! "`
emul: bootstrap to stage2 from within Collapse OS! Big bootstrapping change which greatly reduces the role of the modern operating system in the bootstrapping process. 2020-04-27 00:15:35 +10:00			`," : KEY 0 PC@ ; "`
			`422 470 XPACKR`
			`," ' KEY 12 RAM+ ! "`
Move icore to blkfs The way is clear for complete stage1 bootstrapping on the RC2014 target! 2020-04-24 05:14:14 +10:00			`H@ 256 /MOD 2 PC! 2 PC!`