OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.c-torture/] [unsorted/] [dump-noaddr.c] - Blame information for rev 154

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 149 jeremybenn
#if MASK & 1
2
#define t16(x) x x x x x x x x x x x x x x x x
3
#define M (sizeof (t16(t16(t16(t16(t16(" ")))))) - 1)
4
#endif
5
#if MASK & 2
6
#define M 1048576
7
#endif
8
 
9
typedef struct s {
10
  int c;
11
  void *vp;
12
  struct s *s;
13
}s;
14
 
15
typedef int (*fpt) (const char *, void *, int *);
16
 
17
int M_var = M;
18
 
19
extern void exit (int);
20
 
21
int
22
f (int start, int end, int *a, int *b, int c, s *sp)
23
{
24
  int count = 0;
25
  int i;
26
 
27
  for (i = start; i <= end; i++)
28
    {
29
      a[i] = b[i] + c;
30
      count ++;
31
    }
32
  (*(fpt)sp->s->vp) ("Hello World!\n", &exit, &M_var);
33
  return count;
34
}
35
 
36
int
37
g (int i)
38
{
39
  switch (i)
40
    {
41
    case 1: return 42;
42
    case 2: return 60;
43
    case 3: return 7;
44
    case 4: return 3;
45
    case 5: return M;
46
    default: return 0;
47
    }
48
}

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.