rom/mathffp/spsub.c

   1 /*
   2     Copyright © 1995-2004, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include "mathffp_intern.h"
   7
   8 /*
   9     FUNCTION
  10         Subtract two floating point numbers
  11         fnum = fnum2 - fnum1;
  12
  13     RESULT
  14         FFP number
  15
  16         Flags:
  17           zero     : result is zero
  18           negative : result is negative
  19           overflow : result is out of range
  20
  21     NOTES
  22
  23     EXAMPLE
  24
  25     BUGS
  26
  27     SEE ALSO
  28         SPAdd()
  29
  30     INTERNALS
  31       ALGORITHM:
  32         fnum = fnum2 + (-fnum1).
  33
  34     HISTORY
  35 */
  36
  37 AROS_LH2(float, SPSub,
  38     AROS_LHA(float, fnum1, D0),
  39     AROS_LHA(float, fnum2, D1),
  40     struct LibHeader *, MathBase, 12, Mathffp
  41 )
  42 {
  43     AROS_LIBFUNC_INIT
  44
  45     ULONG r = SPAdd(fnum2, fnum1 ^ FFPSign_Mask);
  46     kprintf("%x - %x = %x\n",fnum2,fnum1,r);
  47     return r;
  48
  49     AROS_LIBFUNC_EXIT
  50 }