; ; Ullrich von Bassewitz, 17.06.1998 ; ; long labs (long x); ; .export _labs .import negeax, tsteax .importzp sreg _labs: ldy sreg+1 ; test hi byte bpl L1 jmp negeax ; Negate if negative L1: rts
labs.s.html; generated on Sat Oct 13 22:41:32 2001 by ca65html