URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Go to most recent revision |
Only display areas with differences |
Details |
Blame |
View Log
Rev 154 |
Rev 816 |
/* This used to ICE on s390 due to a old-loop bug. */
|
/* This used to ICE on s390 due to a old-loop bug. */
|
|
|
/* { dg-do compile } */
|
/* { dg-do compile } */
|
/* { dg-options "-O2" } */
|
/* { dg-options "-O2" } */
|
|
|
char *strcpy (char *dest, const char *src);
|
char *strcpy (char *dest, const char *src);
|
|
|
void test (char *Line, int len)
|
void test (char *Line, int len)
|
{
|
{
|
int z;
|
int z;
|
|
|
for (z = 1; z <= len; z++)
|
for (z = 1; z <= len; z++)
|
if (Line[z - 1])
|
if (Line[z - 1])
|
strcpy (Line + z + 1, Line);
|
strcpy (Line + z + 1, Line);
|
}
|
}
|
|
|
|
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.