l_long_ule.asm
bitfixer_bitfixer/dg/z88dk/libsrc/z80_crt0s/crt0_long/l_long_ule.asm
;       Z88 Small C+ Run Time Library 
;       Long functions
;

                PUBLIC    l_long_ule
                EXTERN     l_long_ucmp




;
;......logical operations: HL set to 0 (false) or 1 (true)
;
; DE <= HL [unsigned]
.l_long_ule
        call    l_long_ucmp
        ret     c
        scf
        ret     z
        ccf
        dec     hl
        ret

