mirror of
https://github.com/forth-ev/VolksForth.git
synced 2024-11-26 02:49:17 +00:00
Fix bug in dos-error? - check for non-zero instead of -1
This commit is contained in:
parent
4263b89a67
commit
916ac6e0c4
@ -83,7 +83,7 @@ Input: keyboard [ here input ! ]
|
||||
Dos definitions
|
||||
' 2- | Alias dosfcb> ' 2+ | Alias >dosfcb
|
||||
|
||||
: dos-error? ( n -- f ) $FF = ;
|
||||
: dos-error? ( n -- f ) 0<> ;
|
||||
|
||||
$5C Constant fcb
|
||||
: reset ( -- ) 0 &13 bdos ;
|
||||
|
Loading…
Reference in New Issue
Block a user