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.
1309 Commits
4 Branches
13MB
Tree: 54bc2e4b96
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from '54bc2e4b96'
${ noResults }
collapseos/blk/390

12 lines
275B
Raw Blame History 

  1. ( Initializes the readln subsystem )

  2. : RDLN$

  3.     H@ 0x32 ( IN(* ) RAM+ !

  4.     ( plus 2 for extra bytes after buffer: 1 for

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

  6.     IN) IN( - ALLOT

  7.     (infl)

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

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

  10. ;