l_eq.asm
bitfixer_bitfixer/dg/z88dk/libsrc/_DEVELOPMENT/l/sccz80/crt0/l_eq.asm
;       Z88 Small C+ Run time Library
;       Moved functions over to proper libdefs
;       To make startup code smaller and neater!
;
;       6/9/98  djm
;       13/5/99 djm Added carry conditions...

SECTION code_clib
SECTION code_l_sccz80

PUBLIC l_eq

l_eq:

   ; de == hl
   ; carry set if true
   
   or a
   sbc hl,de
   
   scf
   ret z
   
   or a
   ret
