From: Christian Groessler <chris@groessler.org>
Date: Wed, 24 Jul 2013 08:24:47 +0000 (+0200)
Subject: fix cleanup of stack
X-Git-Tag: V2.15~250^2
X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=56588aa26af74680ef8c291dae636e7ee906ab66;p=cc65

fix cleanup of stack
---

diff --git a/libsrc/atari/sysrename.s b/libsrc/atari/sysrename.s
index d3e430ada..fef18bded 100644
--- a/libsrc/atari/sysrename.s
+++ b/libsrc/atari/sysrename.s
@@ -164,13 +164,14 @@ copend2:ldx     tmp4
         clc
         adc     sspc
         sta     sp
-        bcc     L2
-        inc     sp+1
-L2:     pla
-        tay
+        lda     sp+1
+        adc     sspc+1
+        sta     sp+1
 
 ; handle status
 
+        pla
+        tay
         bmi     cioerr
         lda     #0
         rts