izaya
/
collapseos
mirror of https://github.com/hsoft/collapseos.git
1
1
Fork 0
Code Issues 0 Releases 0 Wiki Activity
Mirror of CollapseOS
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
1156 Commits
4 Branches
13MB
Tree: 4e1fe916be
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from '4e1fe916be'
${ noResults }
collapseos/blk/411

16 lines
433B
Raw Blame History 

  1. : BOOT

  2.     0x02 RAM+ CURRENT* !

  3.     CURRENT @ 0x2e RAM+ ! ( 2e == BOOT C< PTR )

  4.     0 0x08 RAM+ !  ( 08 == C<* override )

  5.     0 0x53 RAM+ !  ( 53 == (emit) override )

  6.     0 0x55 RAM+ !  ( 55 == (key) override )

  7.     0 0x0a RAM+ !  ( NLPTR )

  8.     ( 0c == C<* )

  9.     LIT< (boot<) (find) DROP 0x0c RAM+ !

  10.     ( boot< always has a char waiting. 06 == C<?* )

  11.     1 0x06 RAM+ !

  12.     LIT< INIT (find)

  13.     IF EXECUTE ELSE DROP INTERPRET THEN

  14. ;