mirror of
https://github.com/cc65/cc65.git
synced 2024-09-30 08:57:49 +00:00
labs() is also imaxabs().
git-svn-id: svn://svn.cc65.org/cc65/trunk@4167 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
parent
32e2eb3fad
commit
4b84d95891
@ -1,14 +1,18 @@
|
|||||||
;
|
;
|
||||||
; Ullrich von Bassewitz, 17.06.1998
|
; Ullrich von Bassewitz, 17.06.1998
|
||||||
;
|
;
|
||||||
; long labs (long x);
|
; long __fastcall__ labs (long val);
|
||||||
|
; intmax_t __fastcall imaxabs (intmax_t val);
|
||||||
;
|
;
|
||||||
|
|
||||||
.export _labs
|
.export _labs, _imaxabs
|
||||||
.import negeax, tsteax
|
.import negeax
|
||||||
.importzp sreg
|
.importzp sreg
|
||||||
|
|
||||||
_labs: ldy sreg+1 ; test hi byte
|
|
||||||
|
_labs:
|
||||||
|
_imaxabs:
|
||||||
|
ldy sreg+1 ; test hi byte
|
||||||
bpl L1
|
bpl L1
|
||||||
jmp negeax ; Negate if negative
|
jmp negeax ; Negate if negative
|
||||||
L1: rts
|
L1: rts
|
||||||
|
Loading…
Reference in New Issue
Block a user