l_neg.asm
bitfixer_bitfixer/dg/z88dk/libsrc/z80_crt0s/crt0/l_neg.asm
;       Z88 Small C+ Run time Library
;       Moved functions over to proper libdefs
;       To make startup code smaller and neater!
;
;       6/9/98  djm

PUBLIC    l_neg


; HL = -HL

.l_neg

   ld a,h
   cpl
   ld h,a
   ld a,l
   cpl
   ld l,a
   inc hl
   ret
