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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gdb-6.8/] [gdb/] [testsuite/] [gdb.base/] [shmain.c] - Blame information for rev 816

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

Line No. Rev Author Line
1 24 jeremybenn
/* A test */
2
 
3
#include "ss.h"
4
#include <stdio.h>
5
 
6
extern int structarg(struct s);
7
extern int pstructarg(struct s*);
8
extern int shr1(int);
9
extern int shr2(int);
10
extern float sg;
11
 
12
int eglob;
13
 
14
struct {
15
 int a;
16
 int b;
17
} s;
18
 
19
int g;
20
 
21
#ifdef PROTOTYPES
22
int local_structarg(struct s x)
23
#else
24
int local_structarg(x)
25
struct s x;
26
#endif
27
{
28
  return x.b;
29
}
30
 
31
#ifdef PROTOTYPES
32
int mainshr1(int g)
33
#else
34
int mainshr1(g)
35
int g;
36
#endif
37
{
38
  return 2*g;
39
}
40
 
41
int main()
42
{
43
  struct s y;
44
  g = 1;
45
  g = shr1(g);
46
  g = shr2(g);
47
  g = mainshr1(g);
48
  sg = 1.1;
49
  printf("address of sg is 0x%x\n", &sg);
50
  y.a = 3;
51
  y.b = 4;
52
  g = local_structarg(y);
53
  g = structarg(y);
54
  g = pstructarg(&y);
55
  return 0;
56
}

powered by: WebSVN 2.1.0

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