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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.c-torture/] [unsorted/] [udconvert.c] - Diff between revs 149 and 154

Go to most recent revision | Only display areas with differences | Details | Blame | View Log

Rev 149 Rev 154
double
double
unsigned_to_double1 (u)
unsigned_to_double1 (u)
     unsigned u;
     unsigned u;
{
{
  double d;
  double d;
  d = (int) u;                  /* convert as from a *signed* integer */
  d = (int) u;                  /* convert as from a *signed* integer */
  return ((int) u < 0)
  return ((int) u < 0)
    ? d + 4294967296.0
    ? d + 4294967296.0
      : d;
      : d;
}
}
 
 
/* Alternatively */
/* Alternatively */
 
 
double
double
unsigned_to_double2 (u)
unsigned_to_double2 (u)
     unsigned u;
     unsigned u;
{
{
  double d;
  double d;
  u -= 2147483648;              /* complement sign bit */
  u -= 2147483648;              /* complement sign bit */
  d = (int) u;                  /* convert as from a *signed* integer */
  d = (int) u;                  /* convert as from a *signed* integer */
  return d + 2147483648.0;
  return d + 2147483648.0;
}
}
 
 
unsigned
unsigned
double_to_unsigned (d)
double_to_unsigned (d)
     double d;
     double d;
{
{
  d += 2147483648.0;
  d += 2147483648.0;
  return ((int) d) - 2147483648;
  return ((int) d) - 2147483648;
}
}
 
 

powered by: WebSVN 2.1.0

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