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

                PUBLIC    l_long_uge
                EXTERN     l_long_ucmp




;
;......logical operations: HL set to 0 (false) or 1 (true)
;

; primary (stack) >= secondary (dehl)

.l_long_uge
        call    l_long_ucmp
        ccf
        ret     c
        scf
        ret     z
;        ret     nc
        ccf
        dec     hl
        ret
