cm48_sccz80p_ufloat.asm
bitfixer_bitfixer/dg/z88dk/libsrc/_DEVELOPMENT/math/float/math48/c/sccz80/cm48_sccz80p_ufloat.asm

SECTION code_clib
SECTION code_fp_math48

PUBLIC cm48_sccz80p_ufloat

EXTERN am48_double32u

   ; sccz80 float primitive
   ; Convert unsigned long to math48 float
   ;
   ; enter : DEHL = unsigned long n
   ;
   ; exit  : AC'= (float)(n)
   ;
   ; uses  : AF, BC, DE, HL, AF', BC', DE', HL'

defc cm48_sccz80p_ufloat = am48_double32u
