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/] [signext.c] - Rev 247

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

void longprint (x)
     long long x;
{
  printf (" %d, %d\n", (unsigned) ((unsigned long long) x >> 32),
	  (unsigned) x);
}
 
void
k_min (p, qa, d)
     int d;
{
  int s = 1;
  long long x;
 
  if (s >= d)
    s -= d;
 
  x = ((long long)((8 * s) % 3) + qa) % d;
  longprint (x);
}
 
int
main ()
{
  k_min (100003, -600017, 3);
  return 0;
}
 

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.