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
2002-05-10 David S. Miller <davem@redhat.com>
[official-gcc.git]
/
gcc
/
testsuite
/
gcc.c-torture
/
execute
/
930930-1.c
blob
68fdbbfe8518fb348168d3074899167a266be736
1
long
*
wm_TR
;
2
long
*
wm_HB
;
3
long
*
wm_SPB
;
4
5
long
mem
[
100
];
6
7
f
(
mr_TR
,
mr_SPB
,
mr_HB
,
reg1
,
reg2
)
8
long
*
mr_TR
;
9
long
*
mr_SPB
;
10
long
*
mr_HB
;
11
long
*
reg1
;
12
long
*
reg2
;
13
{
14
long
*
x
=
mr_TR
;
15
16
for
(;;)
17
{
18
if
(
reg1
<
reg2
)
19
goto
out
;
20
if
((
long
*) *
reg1
<
mr_HB
&& (
long
*) *
reg1
>=
mr_SPB
)
21
*--
mr_TR
= *
reg1
;
22
reg1
--;
23
}
24
out
:
25
26
if
(
x
!=
mr_TR
)
27
abort
();
28
}
29
30
main
()
31
{
32
mem
[
99
] = (
long
)
mem
;
33
f
(
mem
+
100
,
mem
+
6
,
mem
+
8
,
mem
+
99
,
mem
+
99
);
34
exit
(
0
);
35
}