From: cuz <cuz@b7a2c559-68d2-44c3-8de9-860c34a00d81>
Date: Fri, 3 Jan 2003 08:03:53 +0000 (+0000)
Subject: DONE must set an error code
X-Git-Tag: V2.12.0~1799
X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=5f5bfa8751b4a6a5a0b4b7a7cf31d7b297b0f1f1;p=cc65

DONE must set an error code


git-svn-id: svn://svn.cc65.org/cc65/trunk@1875 b7a2c559-68d2-44c3-8de9-860c34a00d81
---

diff --git a/libsrc/c64/c64-320-200-2.s b/libsrc/c64/c64-320-200-2.s
index ff19f1ba6..ee6ab2e20 100644
--- a/libsrc/c64/c64-320-200-2.s
+++ b/libsrc/c64/c64-320-200-2.s
@@ -193,7 +193,7 @@ INIT:
 
         lda     $D011        	; And turn on bitmap
         ora     #$20
-        sta     $D011
+DONE1:  sta     $D011
 
 ; Done, reset the error code
 
@@ -221,8 +221,7 @@ DONE:   lda     $DD02           ; Set the data direction regs
 
         lda     $D011
         and     #<~$20
-        sta     $D011
-        rts
+        jmp     DONE1
 
 ; ------------------------------------------------------------------------
 ; GETERROR: Return the error code in A and clear it.