6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2025-02-03 22:32:24 +00:00
Code Issues Projects Releases Wiki Activity

labs() is also imaxabs().

Browse Source 
git-svn-id: svn://svn.cc65.org/cc65/trunk@4167 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
uz 2009-09-13 18:06:43 +00:00
parent 32e2eb3fad
commit 4b84d95891
1 changed files with 8 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
libsrc/common/labs.s
View File

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