mirror of
https://github.com/hsoft/collapseos.git
synced 2024-11-27 17:58:06 +11:00
12 lines
197 B
Plaintext
12 lines
197 B
Plaintext
VARIABLE XCURRENT
|
|
|
|
: XCON XCURRENT CURRENT* ! ;
|
|
: XCOFF 0x02 RAM+ CURRENT* ! ;
|
|
|
|
: (xentry) XCON (entry) XCOFF ;
|
|
: XCREATE (xentry) 11 C, ;
|
|
|
|
: XCODE XCON CODE XCOFF ;
|
|
|
|
: XIMM XCON IMMEDIATE XCOFF ;
|