collapseos/blk/401

mirror of https://github.com/hsoft/collapseos.git synced 2024-11-24 01:48:06 +11:00
( returns negative value on error )
: _            ( c -- n )
    ( '0' is ASCII 48 )
    48 -
    DUP 0< ( bad ) OVER 2 < ( good ) OR IF EXIT THEN
    ( bad )
    255 -
;
Move all parsing words to Inner core This allows us to get rid of the (parse*) indirection. 2020-05-03 11:21:47 +10:00			`( returns negative value on error )`
			`: _ ( c -- n )`
			`( '0' is ASCII 48 )`
			`48 -`
			`DUP 0< ( bad ) OVER 2 < ( good ) OR IF EXIT THEN`
			`( bad )`
			`255 -`
Move icore to blkfs The way is clear for complete stage1 bootstrapping on the RC2014 target! 2020-04-24 05:14:14 +10:00			`;`