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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [compile/] [20080806-1.c] - Rev 774

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

/* This used to ICE on s390x due to a reload bug.  */
 
#if defined(STACK_SIZE) && (STACK_SIZE < 65536)
  #define BYTES 64
#else
  #define BYTES 65400
#endif
 
int gl2;
typedef __SIZE_TYPE__ size_t;
 
extern void *memcpy (void *dest, const void *src, size_t n);
 
void
f1 ()
{
  int i2;
  unsigned char bf[BYTES];
 
  for (i2 = 0; i2 < 3; i2++)
    {
      unsigned char *p2 = bf;
      unsigned char *p3 = ((void *) 0);
      unsigned short ctf2;
 
      p2 += sizeof (short);
 
      for (ctf2 = 0; ctf2 < 3; ctf2++)
	{
	  if (ctf2 == 1)
	    {
	      unsigned short of = p2 - bf - 6;
	      unsigned short *ofp = (unsigned short *) &of;
	      memcpy (p3, ofp, sizeof (short));
	    }
 
	  if (gl2 == 1)
	    p2 += 3;
	}
    }
}
 

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.