Changed name for long compare subroutine

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

diff --git a/libsrc/runtime/lcmp.s b/libsrc/runtime/lcmp.s
index c2cb9ffe3a9fd92a142b256603e53ba149812f6f..c9368d5256379afc469258191ef28f726383fe1c 100644 (file)
--- a/libsrc/runtime/lcmp.s
+++ b/libsrc/runtime/lcmp.s
@@ -4,12 +4,13 @@
 ; Long int compare function - used by the compare operators
 ;
 
-       .export         lcmp
+       .export         toslcmp
        .import         incsp4
        .importzp       sp, sreg, ptr1
 
 
-lcmp:          sta     ptr1
+toslcmp:
+       sta     ptr1
        stx     ptr1+1          ; EAX now in sreg:ptr1
 
        ldy     #$03
@@ -47,4 +48,4 @@ L4:   php                     ; Save flags
        plp                     ; Restore flags
        rts
 
-                 
+

diff --git a/libsrc/runtime/leq.s b/libsrc/runtime/leq.s
index 5f8d6d33d6ce33dc322aad6ab3615387a4df3c5c..6349caffc07054f133cf719d19c51fbc79a2a6f8 100644 (file)
--- a/libsrc/runtime/leq.s
+++ b/libsrc/runtime/leq.s
@@ -5,11 +5,11 @@
 ;
 
        .export         toseqeax
-       .import         lcmp, booleq
+       .import         toslcmp, booleq
 
-toseqeax:
-       jsr     lcmp            ; Set flags
+toseqeax:                      
+       jsr     toslcmp         ; Set flags
        jmp     booleq          ; Convert to boolean
 
 
-     
+

diff --git a/libsrc/runtime/lge.s b/libsrc/runtime/lge.s
index f98d9fb0e2be47ef2b9c5fd63915dc2e174d0cfa..1e4df329c320c75579f4b87024f78ae9b7ccbb68 100644 (file)
--- a/libsrc/runtime/lge.s
+++ b/libsrc/runtime/lge.s
@@ -5,9 +5,9 @@
 ;
 
        .export         tosgeeax
-               .import         lcmp, boolge
+               .import         toslcmp, boolge
 
 tosgeeax:
-               jsr     lcmp            ; Set the flags
+               jsr     toslcmp         ; Set the flags
                jmp     boolge          ; Convert to boolean
 

diff --git a/libsrc/runtime/lgt.s b/libsrc/runtime/lgt.s
index de08c478721ff4c6ea05e03d3c518f8591c23535..aa7157000beed558a1a069095516a38095ca828f 100644 (file)
--- a/libsrc/runtime/lgt.s
+++ b/libsrc/runtime/lgt.s
@@ -5,10 +5,10 @@
 ;
 
        .export         tosgteax
-       .import         lcmp, boolgt
+       .import         toslcmp, boolgt
 
 tosgteax:
-               jsr     lcmp            ; Set the flags
+               jsr     toslcmp         ; Set the flags
        jmp     boolgt          ; Convert to boolean
 
 

diff --git a/libsrc/runtime/lle.s b/libsrc/runtime/lle.s
index 06d6e0abc46ee3d34992c24a074e81c90c8e87b7..6f11e0339ddb8b1758b4cd1180bc9c79c04d2b72 100644 (file)
--- a/libsrc/runtime/lle.s
+++ b/libsrc/runtime/lle.s
@@ -5,9 +5,9 @@
 ;
 
        .export         tosleeax
-       .import         lcmp, boolle
+       .import         toslcmp, boolle
 
 tosleeax:
-               jsr     lcmp            ; Set the flags
+               jsr     toslcmp         ; Set the flags
        jmp     boolle          ; Convert to boolean
 

diff --git a/libsrc/runtime/llt.s b/libsrc/runtime/llt.s
index 5654212042b2ee90c7849f78cc6dd5249cb3513d..5d5290d3450f327a72d8c32d3d251cd3cdeaf9b2 100644 (file)
--- a/libsrc/runtime/llt.s
+++ b/libsrc/runtime/llt.s
@@ -5,8 +5,8 @@
 ;
 
        .export         toslteax
-               .import         lcmp, boollt
+               .import         toslcmp, boollt
 
 toslteax:
-               jsr     lcmp            ; Set the flags
+               jsr     toslcmp         ; Set the flags
        jmp     boollt          ; Convert to boolean

diff --git a/libsrc/runtime/lne.s b/libsrc/runtime/lne.s
index d948fc271acb722009c8ece6f824b1cfc68fa6a8..e0f0485793b001c24e4834b9a64f7b109acd4b03 100644 (file)
--- a/libsrc/runtime/lne.s
+++ b/libsrc/runtime/lne.s
@@ -5,10 +5,10 @@
 ;
 
        .export         tosneeax
-       .import         lcmp, boolne
+       .import         toslcmp, boolne
 
 tosneeax:
-       jsr     lcmp            ; Set flags
+       jsr     toslcmp         ; Set flags
        jmp     boolne          ; Convert to boolean
 
 

diff --git a/libsrc/runtime/luge.s b/libsrc/runtime/luge.s
index 803640c65cee09175cc28e1a5f7bdef6d1ef521d..541ff4852adfa12ec9984ab38e0fb7016c0a5a61 100644 (file)
--- a/libsrc/runtime/luge.s
+++ b/libsrc/runtime/luge.s
@@ -5,9 +5,9 @@
 ;
 
        .export         tosugeeax
-               .import         lcmp, booluge
+               .import         toslcmp, booluge
 
-tosugeeax:                 
-               jsr     lcmp            ; Set the flags
+tosugeeax:
+               jsr     toslcmp         ; Set the flags
                jmp     booluge         ; Convert to boolean
 

diff --git a/libsrc/runtime/lugt.s b/libsrc/runtime/lugt.s
index eb4712197fcda16046eb7f71c939637395cae8c0..19cbcc0fa9154efc3ba23cfcb8b6a2b8eec8c6e0 100644 (file)
--- a/libsrc/runtime/lugt.s
+++ b/libsrc/runtime/lugt.s
@@ -5,10 +5,10 @@
 ;
 
        .export         tosugteax
-       .import         lcmp, boolugt
+       .import         toslcmp, boolugt
 
-tosugteax:                 
-               jsr     lcmp            ; Set the flags
+tosugteax:
+               jsr     toslcmp         ; Set the flags
        jmp     boolugt         ; Convert to boolean
 
 

diff --git a/libsrc/runtime/lule.s b/libsrc/runtime/lule.s
index 7b080df0a896683968f8159a5eeed9605bf04d54..d898979d5b97a2bfc1698220ef2e87a7f71fc652 100644 (file)
--- a/libsrc/runtime/lule.s
+++ b/libsrc/runtime/lule.s
@@ -5,9 +5,9 @@
 ;
 
        .export         tosuleeax
-       .import         lcmp, boolule
+       .import         toslcmp, boolule
 
 tosuleeax:
-               jsr     lcmp            ; Set the flags
+               jsr     toslcmp         ; Set the flags
        jmp     boolule         ; Convert to boolean
 

diff --git a/libsrc/runtime/lult.s b/libsrc/runtime/lult.s
index 85b8b9ab93f1611106df8d5a362ddc1c3b5b4e39..f13735eb1a128e4c06c4a34e9511b9117983ac06 100644 (file)
--- a/libsrc/runtime/lult.s
+++ b/libsrc/runtime/lult.s
@@ -5,8 +5,8 @@
 ;
 
        .export         tosulteax
-               .import         lcmp, boolult
+               .import         toslcmp, boolult
 
-tosulteax:                 
-               jsr     lcmp            ; Set the flags
+tosulteax:
+               jsr     toslcmp         ; Set the flags
        jmp     boolult         ; Convert to boolean

diff --git a/libsrc/runtime/pusha.s b/libsrc/runtime/pusha.s
index 97d3154a854d07e2e83a7eef168e38bd5a0957be..dc5e546974bffa70b92dd843745460d22f19be02 100644 (file)
--- a/libsrc/runtime/pusha.s
+++ b/libsrc/runtime/pusha.s
@@ -4,11 +4,13 @@
 ; CC65 runtime: Push value in a onto the stack
 ;
 
-               .export         pushaysp, pusha
+               .export         pusha0sp, pushaysp, pusha
        .importzp       sp
 
 ; Beware: The optimizer knows about this function!
 
+pusha0sp:
+       ldy     #$00
 pushaysp:
        lda     (sp),y
 pusha: ldy     sp