blob: 588c7cef8a1e6e48fc5809cca47210b99bb8537a (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
|
/*
930628-1.c from the execute part of the gcc torture suite.
*/
#include <testfwk.h>
#ifdef __SDCC
#pragma std_c99
#pragma disable_warning 93
#endif
void f (double x[2], double y[2])
{
if (x == y)
ASSERT (0);
}
void
testTortureExecute (void)
{
#if !defined(__SDCC_mcs51) && !defined(__SDCC_pdk14) && !defined(__SDCC_pdk15) // Lack of memory
struct { int f[3]; double x[1][2]; } tp[4][2];
int i, j, ki, kj, mi, mj;
float bdm[4][2][4][2];
for (i = 0; i < 4; i++)
for (j = i; j < 4; j++)
for (ki = 0; ki < 2; ki++)
for (kj = 0; kj < 2; kj++)
if ((j == i) && (ki == kj))
bdm[i][ki][j][kj] = 1000.0;
else
{
for (mi = 0; mi < 1; mi++)
for (mj = 0; mj < 1; mj++)
f (tp[i][ki].x[mi], tp[j][kj].x[mj]);
bdm[i][ki][j][kj] = 1000.0;
}
return;
#endif
}
|
