mirror of
https://github.com/cc65/cc65.git
synced 2024-06-07 07:29:33 +00:00
Fixed first letter of comments (should be upper case).
This commit is contained in:
parent
71420223bc
commit
ba5b580368
|
@ -14,16 +14,16 @@
|
||||||
tosdiva0:
|
tosdiva0:
|
||||||
ldx #0
|
ldx #0
|
||||||
tosdivax:
|
tosdivax:
|
||||||
pha ; check if high-bytes indicate
|
pha ; Check if high-bytes indicate
|
||||||
txa ; different sign, so that we
|
txa ; different sign, so that we have to
|
||||||
ldy #1 ; negate the result after the operation
|
ldy #1 ; negate the result after the operation.
|
||||||
eor (sp),y ; eor with lhs high byte
|
eor (sp),y ; Eor with lhs high byte
|
||||||
sta tmp1 ; save post negation indicator to tmp1
|
sta tmp1 ; Save post negation indicator to tmp1
|
||||||
pla ; back to entry accu
|
pla ; Back to entry accu
|
||||||
jsr absvaludiv16
|
jsr absvaludiv16
|
||||||
ldx ptr1+1
|
ldx ptr1+1
|
||||||
lda ptr1
|
lda ptr1
|
||||||
ldy tmp1 ; fetch indicator
|
ldy tmp1 ; Fetch indicator
|
||||||
bmi negate
|
bmi negate
|
||||||
rts
|
rts
|
||||||
negate: jmp negax
|
negate: jmp negax
|
||||||
|
|
|
@ -19,14 +19,14 @@ tosmodax:
|
||||||
; modulo operation is the same as that of the left operand.
|
; modulo operation is the same as that of the left operand.
|
||||||
|
|
||||||
pha
|
pha
|
||||||
ldy #1 ; prepare lhs operant hi-byte fetch
|
ldy #1 ; Prepare lhs operant hi-byte fetch
|
||||||
lda (sp),y
|
lda (sp),y
|
||||||
sta tmp1 ; save post negation indicator to tmp1
|
sta tmp1 ; Save post negation indicator to tmp1
|
||||||
pla ; back to entry accu
|
pla ; Back to entry accu
|
||||||
jsr absvaludiv16
|
jsr absvaludiv16
|
||||||
ldx sreg+1 ; remainder to return registers
|
ldx sreg+1 ; Remainder to return registers
|
||||||
lda sreg
|
lda sreg
|
||||||
ldy tmp1 ; fetch indicator
|
ldy tmp1 ; Fetch indicator
|
||||||
bmi negate
|
bmi negate
|
||||||
rts
|
rts
|
||||||
negate: jmp negax
|
negate: jmp negax
|
||||||
|
|
|
@ -9,8 +9,8 @@
|
||||||
.export negax
|
.export negax
|
||||||
.export _abs
|
.export _abs
|
||||||
|
|
||||||
_abs: cpx #$00 ; test hi byte
|
_abs: cpx #$00 ; Test hi byte
|
||||||
bpl L1 ; don't touch if positive
|
bpl L1 ; Don't touch if positive
|
||||||
negax: clc
|
negax: clc
|
||||||
eor #$FF
|
eor #$FF
|
||||||
adc #1
|
adc #1
|
||||||
|
|
Loading…
Reference in New Issue
Block a user