remove superfluous ".code" line

[cc65] / libsrc / tgi / tgi_done.s

diff --git a/libsrc/tgi/tgi_done.s b/libsrc/tgi/tgi_done.s
index e3abf53fde2a9887f41a8d9fe719cd524af39b04..a5d1dce7a7315220e633fbaa830c792596fe6837 100644 (file)
--- a/libsrc/tgi/tgi_done.s
+++ b/libsrc/tgi/tgi_done.s
@@ -7,18 +7,14 @@
         .include        "tgi-kernel.inc"
         .include        "tgi-error.inc"
 
-        .export         _tgi_done
+.proc   _tgi_done
 
-_tgi_done:
-        lda     _tgi_mode               ; Is a graphics mode active?
+        lda     _tgi_gmode              ; Is a graphics mode active?
         beq     @L1                     ; Jump if not
         jsr     tgi_done                ; Call the driver routine
-        jsr     tgi_geterror            ; Get the error code
-        sta     _tgi_error              ; Save it for reference
-        cmp     #TGI_ERR_OK
-        bne     @L1                     ; Jump if we had an error
-        sta     _tgi_mode               ; Reset the current mode (A = 0)
+        lda     #$00
+        sta     _tgi_gmode              ; Reset the graph mode flag
 @L1:    rts
 
-
+.endproc