repo.or.cz
/
official-gcc.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
2003-12-26 Guilhem Lavaux <guilhem@kaffe.org>
[official-gcc.git]
/
gcc
/
testsuite
/
gcc.c-torture
/
compile
/
930421-1.c
blob
01b465f7fecbf19a4fc6307a6ab527ec3347602d
1
double
q
(
double
);
2
3
f
(
int
**
x
,
int
*
r
,
int
*
s
,
int
a
,
int
b
,
int
c
,
int
d
)
4
{
5
int
i
,
j
,
k
,
m
,
e
,
f
,
g
,
z
[
1024
],
y
[
2
];
6
7
e
=
g
=
0
;
8
for
(
i
=
0
;
i
<
a
;
i
++)
9
for
(
j
=
0
;
j
<
b
;
j
++)
10
if
(
x
[
i
][
j
])
11
for
(
k
=
0
;
k
<
c
;
k
++)
12
{
13
f
=
q
(
1.5
) +
q
(
2.5
);
14
if
(
g
<
y
[
f
])
15
g
=
e
;
16
}
17
for
(
m
=
0
;
m
<
1
;
m
++)
18
z
[
0
] =
m
*
2
*
d
/
3.0
-
d
;
19
}