cm48_sdccixp_dsadd.asm
bitfixer_bitfixer/dg/z88dk/libsrc/_DEVELOPMENT/math/float/math48/c/sdcc_ix/cm48_sdccixp_dsadd.asm

; float __fsadd (float a1, float a2)

SECTION code_clib
SECTION code_fp_math48

PUBLIC cm48_sdccixp_dsadd

EXTERN cm48_sdccixp_dread2, am48_dadd, cm48_sdccixp_m482d

cm48_sdccixp_dsadd:

   ; add two sdcc floats
   ;
   ; enter : stack = sdcc_float a2, sdcc_float a1, ret
   ;
   ; exit  : dehl = sdcc_float(a1+a2)
   ;
   ; uses  : af, bc, de, hl, af', bc', de', hl'
   
   call cm48_sdccixp_dread2
   
   ; AC = a2
   ; AC'= a1
   
   call am48_dadd
   
   jp cm48_sdccixp_m482d
