l_asl.asm
bitfixer_bitfixer/dg/z88dk/libsrc/z80_crt0s/crt0/l_asl.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_asl


; shift DE left arithmetically by HL, move to HL

.l_asl 
        ex de,hl
.l_asl1   
        dec   e
        ret   m
        add   hl,hl
        jp    l_asl1
