summaryrefslogtreecommitdiff
path: root/support/regression/tests/gcc-torture-execute-921124-1.c
blob: ea084301d4bbcf4a95c312fb8db66f768335eeb3 (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
/*
   921124-1.c from the execute part of the gcc torture suite.
 */

#include <testfwk.h>

#ifdef __SDCC
#pragma std_c99
#pragma disable_warning 93
#pragma disable_warning 85
#endif

int f(int x, double d1, double d2, double d3)
{
   return x;
}

void g(char *b, char *s, double x, double y, int i, int j)
{
#if !defined(__SDCC_pdk14) // Lack of memory
  if (x != 1.0 || y != 2.0 || i != 3 || j != 4)
    ASSERT(0);
#endif
}

void
testTortureExecute (void)
{
  g("","", 1.0, 2.0, f(3, 0.0, 0.0, 0.0), f(4, 0.0, 0.0, 0.0));
  return;
}