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