collapseos/emul/xcomp.fs

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

CURRENT @ XCURRENT !

282 LOAD  ( boot.z80 )
393 LOAD  ( xcomp core low )
: (emit) 0 PC! ;
: (key) 0 PC@ ;
420 LOAD  ( xcomp core high )
(entry) _
( Update LATEST )
PC ORG @ 8 + !
," CURRENT @ HERE ! "
440 446 XPACKR
," ' (key) 12 RAM+ ! "
ORG @ 256 /MOD 2 PC! 2 PC!
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-23 15:14:14 -04:00			`0xe800 CONSTANT RAMSTART`
			`0xf000 CONSTANT RS_ADDR`
Replace INITIAL_SP with PS_ADDR conf Now I struggle to remember why I ever did things they way I did. There must have been a reason... 2020-05-11 21:08:24 -04:00			`0xfffa CONSTANT PS_ADDR`
Move icore to blkfs The way is clear for complete stage1 bootstrapping on the RC2014 target! 2020-04-23 15:14:14 -04:00			`212 LOAD ( z80 assembler )`
Use blk's boot.z80 2020-04-22 21:49:44 -04:00			`262 LOAD ( xcomp )`
xcomp: don't automatically shadow core words 2020-04-09 09:43:48 -04:00			`: CODE XCODE ;`
xcomp: add XCOMPILE and X[COMPILE] This allows us to move words like ABORT" to xcomp-core, which is I think the last roadblock before being able to unify all drivers into a single xcomp layer. 2020-05-12 21:08:18 -04:00			`: COMPILE XCOMPILE ; IMMEDIATE`
			`: [COMPILE] X[COMPILE] ; IMMEDIATE`
xcomp: don't automatically shadow core words 2020-04-09 09:43:48 -04:00			`: IMMEDIATE XIMM ;`
Avoid using (xentry) outside xcomp config 2020-04-23 12:09:31 -04:00			`: (entry) (xentry) ;`
xcomp: don't automatically shadow core words 2020-04-09 09:43:48 -04: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 08:23:53 -04:00			`CURRENT @ XCURRENT !`
Add CURRENT* and simplify xcomp 2020-04-09 12:01:08 -04:00
Use blk's boot.z80 2020-04-22 21:49:44 -04:00			`282 LOAD ( boot.z80 )`
Free some space for xcomp core low 2020-05-13 08:00:49 -04:00			`393 LOAD ( xcomp core low )`
Split icore in 2 parts The goal is to insert device drivers in between. 2020-05-08 21:47:03 -04:00			`: (emit) 0 PC! ;`
			`: (key) 0 PC@ ;`
Free some space for xcomp core low 2020-05-13 08:00:49 -04:00			`420 LOAD ( xcomp core high )`
Move icore to blkfs The way is clear for complete stage1 bootstrapping on the RC2014 target! 2020-04-23 15:14:14 -04:00			`(entry) _`
Update z80c.bin's LATEST during xcomp instead of using slatest 2020-04-25 22:02:44 -04:00			`( Update LATEST )`
xcomp: remove XOFF and use ORG and BIN( instead 2020-04-28 09:15:17 -04: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-26 10:15:35 -04:00			`," CURRENT @ HERE ! "`
Move core's blk to xcomp core (low and high) TODO: implement X['] so that I can remove those XCURRENT patterns. 2020-05-13 10:14:23 -04:00			`440 446 XPACKR`
Add a layer of indirection for KEY 2020-05-02 10:37:37 -04:00			`," ' (key) 12 RAM+ ! "`
xcomp: move all offset spitting to the end of the unit I'd like to move this code, along with all recipe contents, to blk/. It's easier if "emul-related" code is gathered at the same place. 2020-05-05 20:10:04 -04:00			`ORG @ 256 /MOD 2 PC! 2 PC!`
Move icore to blkfs The way is clear for complete stage1 bootstrapping on the RC2014 target! 2020-04-23 15:14:14 -04:00			`H@ 256 /MOD 2 PC! 2 PC!`