1
0
mirror of https://github.com/cc65/cc65.git synced 2024-10-30 12:28:25 +00:00
cc65/libsrc/common/labs.s
uz 4b84d95891 labs() is also imaxabs().
git-svn-id: svn://svn.cc65.org/cc65/trunk@4167 b7a2c559-68d2-44c3-8de9-860c34a00d81
2009-09-13 18:06:43 +00:00

20 lines
301 B
ArmAsm

;
; Ullrich von Bassewitz, 17.06.1998
;
; long __fastcall__ labs (long val);
; intmax_t __fastcall imaxabs (intmax_t val);
;
.export _labs, _imaxabs
.import negeax
.importzp sreg
_labs:
_imaxabs:
ldy sreg+1 ; test hi byte
bpl L1
jmp negeax ; Negate if negative
L1: rts