1  /* Public domain.  */
       2  typedef int HItype __attribute__ ((mode (HI)));
       3  typedef float SFtype __attribute__ ((mode (SF)));
       4  
       5  extern SFtype __floatsisf (unsigned long);
       6  
       7  SFtype __floathisf (HItype);
       8  
       9  SFtype
      10  __floathisf (HItype u)
      11  {
      12    return __floatsisf ((unsigned long)u);
      13  }