collapseos/blk/393

: RAM+ [ RAMSTART LITN ] + ;
: (parse*) 0x0a RAM+ ;
: HERE 0x04 RAM+ ;
: CURRENT* 0x51 RAM+ ;
: CURRENT CURRENT* @ ;

( w -- a f )
: (find) CURRENT @ SWAP _find ;

: QUIT (resRS) LIT< INTERPRET (find) DROP EXECUTE ;
394 407 LOADR
Move icore to blkfs The way is clear for complete stage1 bootstrapping on the RC2014 target! 2020-04-23 15:14:14 -04:00			`: RAM+ [ RAMSTART LITN ] + ;`
			`: (parse*) 0x0a RAM+ ;`
			`: HERE 0x04 RAM+ ;`
			`: CURRENT* 0x51 RAM+ ;`
			`: CURRENT CURRENT* @ ;`

			`( w -- a f )`
			`: (find) CURRENT @ SWAP _find ;`

Replace the "> " prompt with the more traditional "ok" one This is more than cosmetic, it's also highly usable. The presence or absence of the "ok" message allows us to know whether the command aborted. Previously, the "> " prompt appeared when the system expected a prompt in the INTERPRET context, whether the previous command aborted or not. Also, this allows us to get rid of that ugly FLAGS global variable. 2020-04-24 12:10:07 -04:00			`: QUIT (resRS) LIT< INTERPRET (find) DROP EXECUTE ;`
Move icore to blkfs The way is clear for complete stage1 bootstrapping on the RC2014 target! 2020-04-23 15:14:14 -04:00			`394 407 LOADR`