1  /* { dg-do assemble } */
       2  /* { dg-require-effective-target fpic } */
       3  /* { dg-options "-O2 -msecure-plt -fPIC" } */
       4  /* { dg-skip-if "" { powerpc*-*-darwin* powerpc-ibm-aix* } } */
       5  
       6  #define FE_TONEAREST 0
       7  #define FE_UPWARD 1
       8  #define FE_DOWNWARD 2
       9  #define FE_TOWARDZERO 3
      10  
      11  extern int fesetround(int);
      12  
      13  void
      14  set_fpu_rounding_mode (int mode)
      15  {
      16    int rnd_mode;
      17  
      18    switch (mode)
      19      {
      20        case 2:
      21         rnd_mode = FE_TONEAREST;
      22         break;
      23  
      24        case 4:
      25          rnd_mode = FE_UPWARD;
      26          break;
      27  
      28        case 1:
      29          rnd_mode = FE_DOWNWARD;
      30          break;
      31  
      32        case 3:
      33          rnd_mode = FE_TOWARDZERO; 
      34          break;
      35  
      36        default:
      37          return;
      38      }
      39  
      40    fesetround (rnd_mode);
      41  }