collapseos/blk/270

: CODE XCODE ;
: '? X'? ;
: ['] X['] ; IMMEDIATE
: COMPILE XCOMPILE ; IMMEDIATE
: [COMPILE] X[COMPILE] ; IMMEDIATE
: DO XDO ; IMMEDIATE : LOOP XLOOP ; IMMEDIATE
: IF XIF ; IMMEDIATE : ELSE XELSE ; IMMEDIATE
: AGAIN XAGAIN ; IMMEDIATE : UNTIL XUNTIL ; IMMEDIATE
: LIT" XLIT" ; IMMEDIATE : LITN XLITN ;
: IMMEDIATE XIMM ;
: (entry) (xentry) ; : CREATE XCREATE ; : :** X:** ;
: : [ ' X: , ] ;

CURRENT @ XCURRENT !
xcomp: add overrides into a loadable block Makes xcomp.fs units shorter. 2020-05-14 03:33:24 +10:00			`: CODE XCODE ;`
ti84: use Grid subsystem Also, rename CLRLN to NEWLN and make it clear that it's only called on entering a new line. This way, we can set Z offset in there for the TI-84+ LCD driver. 2020-11-11 12:30:37 +11:00			`: '? X'? ;`
xcomp: add overrides into a loadable block Makes xcomp.fs units shorter. 2020-05-14 03:33:24 +10:00			`: ['] X['] ; IMMEDIATE`
			`: COMPILE XCOMPILE ; IMMEDIATE`
			`: [COMPILE] X[COMPILE] ; IMMEDIATE`
De-stabilize (br), (?br), (loop), (s) When writing the xcomp documentation, I realized that with careful threading and by accepting a bit of code duplication in the xcomp toolset, I could de-stabilize a couple of words. (n) and EXIT are a bit trickier, but I think it can be done. It would be nice to get rid of stable wordrefs... 2020-09-20 03:54:01 +10:00			`: DO XDO ; IMMEDIATE : LOOP XLOOP ; IMMEDIATE`
			`: IF XIF ; IMMEDIATE : ELSE XELSE ; IMMEDIATE`
			`: AGAIN XAGAIN ; IMMEDIATE : UNTIL XUNTIL ; IMMEDIATE`
De-stabilize (n) 2020-09-20 09:44:15 +10:00			`: LIT" XLIT" ; IMMEDIATE : LITN XLITN ;`
xcomp: add overrides into a loadable block Makes xcomp.fs units shorter. 2020-05-14 03:33:24 +10:00			`: IMMEDIATE XIMM ;`
Add alias and switch word types I'm pretty happy about how lightweight the implementation turns out to be. 2020-10-29 06:02:06 +11:00			`: (entry) (xentry) ; : CREATE XCREATE ; : : X: ;`
xcomp: add overrides into a loadable block Makes xcomp.fs units shorter. 2020-05-14 03:33:24 +10:00			`: : [ ' X: , ] ;`

			`CURRENT @ XCURRENT !`