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

Subversion Repositories openrisc

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

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

Line No. Rev Author Line
1 227 jeremybenn
#include "ss.h"
2
#include <stdio.h>
3
 
4
typedef float f;
5
 
6
float sg = 5.5;
7
int sgi = 2;
8
static int sgs = 7;
9
 
10
#ifdef PROTOTYPES
11
int shr1(int x)
12
#else
13
int shr1(x)
14
int x;
15
#endif
16
{
17
  f mumble;
18
  int l;
19
  l = 1;
20
  {
21
    int l;
22
    l = 2;
23
  }
24
  mumble = 7.7;
25
  sg = 6.6;
26
  sgi++;
27
  sgs = 8;
28
  printf("address of sgs is %p\n", &sgs);
29
  return 2*x;
30
}
31
 
32
#ifdef PROTOTYPES
33
static int shr1_local(int x)
34
#else
35
static int shr1_local(x)
36
int x;
37
#endif
38
{
39
  return 2*x;
40
}
41
 
42
#ifdef PROTOTYPES
43
int structarg(struct s x)
44
#else
45
int structarg(x)
46
struct s x;
47
#endif
48
{
49
  return x.a;
50
}
51
 
52
#ifdef PROTOTYPES
53
int pstructarg(struct s *x)
54
#else
55
int pstructarg(x)
56
struct s *x;
57
#endif
58
{
59
  return x->a;
60
}
61
 
62
 
63
 

powered by: WebSVN 2.1.0

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