1
0
mirror of https://github.com/cc65/cc65.git synced 2025-08-08 06:25:17 +00:00

Changed name for long compare subroutine

git-svn-id: svn://svn.cc65.org/cc65/trunk@992 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
cuz
2001-10-01 22:21:16 +00:00
parent b08adf831d
commit c4a5744651
12 changed files with 32 additions and 29 deletions

View File

@@ -4,12 +4,13 @@
; Long int compare function - used by the compare operators ; Long int compare function - used by the compare operators
; ;
.export lcmp .export toslcmp
.import incsp4 .import incsp4
.importzp sp, sreg, ptr1 .importzp sp, sreg, ptr1
lcmp: sta ptr1 toslcmp:
sta ptr1
stx ptr1+1 ; EAX now in sreg:ptr1 stx ptr1+1 ; EAX now in sreg:ptr1
ldy #$03 ldy #$03
@@ -47,4 +48,4 @@ L4: php ; Save flags
plp ; Restore flags plp ; Restore flags
rts rts

View File

@@ -5,11 +5,11 @@
; ;
.export toseqeax .export toseqeax
.import lcmp, booleq .import toslcmp, booleq
toseqeax: toseqeax:
jsr lcmp ; Set flags jsr toslcmp ; Set flags
jmp booleq ; Convert to boolean jmp booleq ; Convert to boolean

View File

@@ -5,9 +5,9 @@
; ;
.export tosgeeax .export tosgeeax
.import lcmp, boolge .import toslcmp, boolge
tosgeeax: tosgeeax:
jsr lcmp ; Set the flags jsr toslcmp ; Set the flags
jmp boolge ; Convert to boolean jmp boolge ; Convert to boolean

View File

@@ -5,10 +5,10 @@
; ;
.export tosgteax .export tosgteax
.import lcmp, boolgt .import toslcmp, boolgt
tosgteax: tosgteax:
jsr lcmp ; Set the flags jsr toslcmp ; Set the flags
jmp boolgt ; Convert to boolean jmp boolgt ; Convert to boolean

View File

@@ -5,9 +5,9 @@
; ;
.export tosleeax .export tosleeax
.import lcmp, boolle .import toslcmp, boolle
tosleeax: tosleeax:
jsr lcmp ; Set the flags jsr toslcmp ; Set the flags
jmp boolle ; Convert to boolean jmp boolle ; Convert to boolean

View File

@@ -5,8 +5,8 @@
; ;
.export toslteax .export toslteax
.import lcmp, boollt .import toslcmp, boollt
toslteax: toslteax:
jsr lcmp ; Set the flags jsr toslcmp ; Set the flags
jmp boollt ; Convert to boolean jmp boollt ; Convert to boolean

View File

@@ -5,10 +5,10 @@
; ;
.export tosneeax .export tosneeax
.import lcmp, boolne .import toslcmp, boolne
tosneeax: tosneeax:
jsr lcmp ; Set flags jsr toslcmp ; Set flags
jmp boolne ; Convert to boolean jmp boolne ; Convert to boolean

View File

@@ -5,9 +5,9 @@
; ;
.export tosugeeax .export tosugeeax
.import lcmp, booluge .import toslcmp, booluge
tosugeeax: tosugeeax:
jsr lcmp ; Set the flags jsr toslcmp ; Set the flags
jmp booluge ; Convert to boolean jmp booluge ; Convert to boolean

View File

@@ -5,10 +5,10 @@
; ;
.export tosugteax .export tosugteax
.import lcmp, boolugt .import toslcmp, boolugt
tosugteax: tosugteax:
jsr lcmp ; Set the flags jsr toslcmp ; Set the flags
jmp boolugt ; Convert to boolean jmp boolugt ; Convert to boolean

View File

@@ -5,9 +5,9 @@
; ;
.export tosuleeax .export tosuleeax
.import lcmp, boolule .import toslcmp, boolule
tosuleeax: tosuleeax:
jsr lcmp ; Set the flags jsr toslcmp ; Set the flags
jmp boolule ; Convert to boolean jmp boolule ; Convert to boolean

View File

@@ -5,8 +5,8 @@
; ;
.export tosulteax .export tosulteax
.import lcmp, boolult .import toslcmp, boolult
tosulteax: tosulteax:
jsr lcmp ; Set the flags jsr toslcmp ; Set the flags
jmp boolult ; Convert to boolean jmp boolult ; Convert to boolean

View File

@@ -4,11 +4,13 @@
; CC65 runtime: Push value in a onto the stack ; CC65 runtime: Push value in a onto the stack
; ;
.export pushaysp, pusha .export pusha0sp, pushaysp, pusha
.importzp sp .importzp sp
; Beware: The optimizer knows about this function! ; Beware: The optimizer knows about this function!
pusha0sp:
ldy #$00
pushaysp: pushaysp:
lda (sp),y lda (sp),y
pusha: ldy sp pusha: ldy sp