softfloat/f32_lt_quiet.c

   1
   2 #include <stdbool.h>
   3 #include <stdint.h>
   4 #include "platform.h"
   5 #include "internals.h"
   6 #include "specialize.h"
   7 #include "softfloat.h"
   8
   9 bool f32_lt_quiet( float32_t a, float32_t b )
  10 {
  11     union ui32_f32 uA;
  12     uint_fast32_t uiA;
  13     union ui32_f32 uB;
  14     uint_fast32_t uiB;
  15     bool signA, signB;
  16
  17     uA.f = a;
  18     uiA = uA.ui;
  19     uB.f = b;
  20     uiB = uB.ui;
  21     if (
  22            ( ( expF32UI( uiA ) == 0xFF ) && fracF32UI( uiA ) )
  23         || ( ( expF32UI( uiB ) == 0xFF ) && fracF32UI( uiB ) )
  24     ) {
  25         if (
  26             softfloat_isSigNaNF32UI( uiA ) || softfloat_isSigNaNF32UI( uiB )
  27         ) {
  28             softfloat_raiseFlags( softfloat_flag_invalid );
  29         }
  30         return false;
  31     }
  32     signA = signF32UI( uiA );
  33     signB = signF32UI( uiB );
  34     return
  35         ( signA != signB ) ? signA && ( (uint32_t) ( ( uiA | uiB )<<1 ) != 0 )
  36             : ( uiA != uiB ) && ( signA ^ ( uiA < uiB ) );
  37
  38 }
  39