OpenCores
URL https://opencores.org/ocsvn/scarts/scarts/trunk

Subversion Repositories scarts

[/] [scarts/] [trunk/] [toolchain/] [scarts-gcc/] [gcc-4.1.1/] [gcc/] [config/] [fixtfdi.c] - Rev 20

Go to most recent revision | Compare with Previous | Blame | View Log

/* Public domain.  */
#if __LDBL_MANT_DIG__ == 106 || __LDBL_MANT_DIG__ == 113
typedef int DItype __attribute__ ((mode (DI)));
typedef float TFtype __attribute__ ((mode (TF)));
 
DItype __fixtfdi (TFtype);
DItype __fixunstfdi (TFtype);
 
 
DItype
__fixtfdi (TFtype x)
{
  if (x < 0)
    return - __fixunstfdi (-x);
  return __fixunstfdi (x);
}
 
#endif
 

Go to most recent revision | Compare with Previous | Blame | View Log

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.