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/451

13 lines
307B
Raw Blame History 

  1. ( Initializes the readln subsystem )

  2. : RDLN$

  3.     ( 57 == rdln's memory )

  4.     H@ 0x57 RAM+ !

  5.     ( 2 for IN>, plus 2 for extra bytes after buffer: 1 for

  6.       the last typed 0x0a and one for the following NULL. )

  7.     INBUFSZ 4 + ALLOT

  8.     (infl)

  9.     ['] RDLN< 0x0c RAM+ !

  10.     1 0x06 RAM+ !  ( 06 == C<? )

  11. ;