collapseos/blk/264

: XAGAIN LIT< (br) XFIND , H@ - C, ;
: XUNTIL LIT< (?br) XFIND , H@ - C, ;
: XLIT< LIT< (s) XFIND , WORD DUP C@ 1+ MOVE, ;
: XLIT"
    LIT< (s) XFIND , H@ 0 C, ,"
    DUP H@ -^ 1- SWAP C!
;
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			`: XAGAIN LIT< (br) XFIND , H@ - C, ;`
			`: XUNTIL LIT< (?br) XFIND , H@ - C, ;`
			`: XLIT< LIT< (s) XFIND , WORD DUP C@ 1+ MOVE, ;`
Fix LIT" I've mistakenly broken it in previous commit. 2020-09-20 04:28:10 +10:00			`: XLIT"`
			`LIT< (s) XFIND , H@ 0 C, ,"`
			`DUP H@ -^ 1- SWAP C!`
			`;`