l_mulu_40_32x8.asm
bitfixer_bitfixer/dg/z88dk/libsrc/_DEVELOPMENT/math/integer/l_mulu_40_32x8.asm

INCLUDE "clib_cfg.asm"

SECTION code_clib
SECTION code_math

PUBLIC l_mulu_40_32x8

   ; compute:  adehl = dehl * a
   ; alters :  af, bc, de, hl, ixh

IF __CLIB_OPT_IMATH <= 50

   EXTERN l_small_mul_40_32x8

l_mulu_40_32x8:

   exx
   
   push bc
   push de
   push hl
   
   exx
   
   call l_small_mul_40_32x8
   
   exx
   
   pop hl
   pop de
   pop bc
   
   exx
   ret
   
ENDIF

IF __CLIB_OPT_IMATH > 50

   EXTERN l_fast_mulu_40_32x8
   defc l_mulu_40_32x8 = l_fast_mulu_40_32x8

ENDIF
