OSDN Git Service
(root)
/
pf3gnuchains
/
gcc-fork.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
2007-06-11 Andreas Tobler <a.tobler@schweiz.org>
[pf3gnuchains/gcc-fork.git]
/
gcc
/
testsuite
/
gcc.dg
/
20031216-1.c
1
/* This used to abort due to a loop bug on s390*. */
2
3
/* { dg-do run } */
4
/* { dg-options "-O2" } */
5
/* { dg-options "-O2 -fPIC" { target s390*-*-* } } */
6
7
extern void abort (void);
8
9
int count = 0;
10
char *str;
11
12
void test (int flag)
13
{
14
char *p;
15
16
for (;;)
17
{
18
if (count > 5)
19
return;
20
21
p = "test";
22
23
if (flag)
24
count++;
25
26
str = p;
27
}
28
}
29
30
int main (void)
31
{
32
test (1);
33
34
if (str[0] != 't')
35
abort ();
36
37
return 0;
38
}
39