don't use constructor to setup runtime stack

[cc65] / libsrc / cbm / sysrename.s

diff --git a/libsrc/cbm/sysrename.s b/libsrc/cbm/sysrename.s
index b4211f9b4850b0ab76bb636a96d7c9d7ab7b4f34..86cb370112348e53991e7266b4dec7f9b836b0df 100644 (file)
--- a/libsrc/cbm/sysrename.s
+++ b/libsrc/cbm/sysrename.s
@@ -7,10 +7,12 @@
         .export         __sysrename
 
         .import         fnparse, fnadd, fnparsename
-        .import         writefndiskcmd, closecmdchannel
+        .import         opencmdchannel, closecmdchannel
+        .import         writefndiskcmd, readdiskerror
         .import         popax
 
         .import         fncmd, fnunit
+        .importzp       ptr1
 
 
 ;--------------------------------------------------------------------------
@@ -25,13 +27,23 @@
         jsr     fnadd
 
         jsr     popax
+        sta     ptr1
+        stx     ptr1+1
+        ldy     #0
         jsr     fnparsename     ; Parse second filename
         bne     done
 
+        ldx     fnunit
+        jsr     opencmdchannel
+        bne     done
+
         lda     #'r'            ; Rename command
         sta     fncmd
         jsr     writefndiskcmd
 
+;       ldx     fnunit
+;       jsr     readdiskerror
+
         pha
         ldx     fnunit
         jsr     closecmdchannel