softfloat/f32_to_i32_r_minMag.c

   1
   2 #include <stdbool.h>
   3 #include <stdint.h>
   4 #include "platform.h"
   5 #include "internals.h"
   6 #include "softfloat.h"
   7
   8 int_fast32_t f32_to_i32_r_minMag( float32_t a, bool exact )
   9 {
  10     union ui32_f32 uA;
  11     uint_fast32_t uiA;
  12     int_fast16_t exp;
  13     uint_fast32_t sig;
  14     bool sign;
  15     int_fast16_t shiftCount;
  16     int_fast32_t absZ;
  17
  18     uA.f = a;
  19     uiA = uA.ui;
  20     exp = expF32UI( uiA );
  21     sig = fracF32UI( uiA );
  22     if ( exp < 0x7F ) {
  23         if ( exact && ( exp | sig ) ) {
  24             softfloat_exceptionFlags |= softfloat_flag_inexact;
  25         }
  26         return 0;
  27     }
  28     sign = signF32UI( uiA );
  29     shiftCount = 0x9E - exp;
  30     if ( shiftCount <= 0 ) {
  31         if ( uiA != packToF32UI( 1, 0x9E, 0 ) ) {
  32             softfloat_raiseFlags( softfloat_flag_invalid );
  33             if ( ! sign || ( ( exp == 0xFF ) && sig ) ) return 0x7FFFFFFF;
  34         }
  35         return -0x7FFFFFFF - 1;
  36     }
  37     sig = ( sig | 0x00800000 )<<8;
  38     absZ = sig>>shiftCount;
  39     if ( exact && (uint32_t) ( sig<<( ( - shiftCount ) & 31 ) ) ) {
  40         softfloat_exceptionFlags |= softfloat_flag_inexact;
  41     }
  42     return sign ? - absZ : absZ;
  43
  44 }
  45