Clear __oserror on success.

git-svn-id: svn://svn.cc65.org/cc65/trunk@4721 b7a2c559-68d2-44c3-8de9-860c34a00d81
2010-06-15 21:44:18 +00:00
parent 155c5629a9
commit 148a6569e5
6 changed files with 13 additions and 10 deletions
--- a/libsrc/apple2/read.s
+++ b/libsrc/apple2/read.s
@@ -47,8 +47,11 @@ _read:
        ldy	#READ_CALL
        jmp	rwcommon

-        ; Set counter to zero
+        ; Device succeeds always
 device: lda	#$00
+        sta	__oserror
+
+        ; Set counter to zero
        sta	ptr3
        sta	ptr3+1