Merged pull request #459 from "pmjdebruijn/pragma".

[cc65] / libsrc / cbm510 / banking.s

diff --git a/libsrc/cbm510/banking.s b/libsrc/cbm510/banking.s
index f0a3cbd024545058a65dca4e960b79807cee70cc..8ed72d02be9c466df135922e98b14988bf8f534b 100644 (file)
--- a/libsrc/cbm510/banking.s
+++ b/libsrc/cbm510/banking.s
@@ -1,41 +1,41 @@
 ;
-; Ullrich von Bassewitz, 13.09.2001
+; Ullrich von Bassewitz, 28.09.1998
 ;
-; Banking routines for the 510.
+; Banking routines for the 610.
 ;
 
-       .export         set_bank, sys_bank, restore_bank
-       .importzp       ptr1
+        .export         set_bank, sys_bank, restore_bank
+        .importzp       ptr1, segsave
 
-       .include        "zeropage.inc"
+        .include        "cbm510.inc"
 
 .code
 
-.proc  sys_bank
-       pha
-       lda     IndReg
-       sta     IndSegSave
-       lda     #$0F
-       sta     IndReg
-       pla
-       rts
+.proc   sys_bank
+        pha
+        lda     IndReg
+        sta     segsave
+        lda     #$0F
+        sta     IndReg
+        pla
+        rts
 .endproc
 
-.proc  set_bank
-       pha
-       lda     IndReg
-       sta     IndSegSave
-       pla
-       sta     IndReg
-       rts
+.proc   set_bank
+        pha
+        lda     IndReg
+        sta     segsave
+        pla
+        sta     IndReg
+        rts
 .endproc
 
-.proc  restore_bank
-       pha
-       lda     IndSegSave
-       sta     IndReg
-       pla
-       rts
+.proc   restore_bank
+        pha
+        lda     segsave
+        sta     IndReg
+        pla
+        rts
 .endproc