1
0
mirror of https://github.com/hsoft/collapseos.git synced 2025-04-02 11:38:40 +11:00

BROWSE: ignore invalid digits

Documentation in block 100 says a number followed by a space or return
lists the contents of the block. However, typing any other character
does this too, because _pdacc returns -1 in this case.

This is annoying because typing "n" instead of "N" immediately after
jumping to some block was bringing you to block 0. Now "n" is ignored
instead.

This commit changes the condition for printing to explicitly check for
the value of 1, which means whitespace according to _pdacc documentation
in block 355.
This commit is contained in:
Alexander Krotov 2020-06-17 02:47:42 +03:00
parent feeedcc55c
commit 3475f2179d

View File

@ -2,7 +2,7 @@ CREATE ACC 0 ,
: _LIST ." Block " DUP . NL LIST ;
: _NUM
ACC @ SWAP _pdacc
IF _LIST 0 THEN
1 = IF _LIST 0 THEN
ACC !
;
: L BLK> @ _LIST ;