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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gdb-7.2/] [gdb/] [testsuite/] [gdb.stabs/] [gdb11479.c] - Blame information for rev 414

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

Line No. Rev Author Line
1 330 jeremybenn
/* This testcase is part of GDB, the GNU debugger.
2
 
3
   Copyright 2010 Free Software Foundation, Inc.
4
 
5
   Contributed by Pierre Muller.
6
 
7
   This program is free software; you can redistribute it and/or modify
8
   it under the terms of the GNU General Public License as published by
9
   the Free Software Foundation; either version 3 of the License, or
10
   (at your option) any later version.
11
 
12
   This program is distributed in the hope that it will be useful,
13
   but WITHOUT ANY WARRANTY; without even the implied warranty of
14
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15
   GNU General Public License for more details.
16
 
17
   You should have received a copy of the GNU General Public License
18
   along with this program.  If not, see <http://www.gnu.org/licenses/>.
19
 
20
   Qualifiers of forward types are not resolved correctly with stabs.  */
21
 
22
struct dummy;
23
 
24
enum dummy_enum;
25
 
26
/* This function prevents the compiler from dropping local variables
27
   we need for the test.  */
28
void *hack (const struct dummy *t, const enum dummy_enum *e);
29
 
30
const void *
31
test (const struct dummy *t)
32
{
33
  const struct dummy *tt;
34
  enum dummy_enum *e;
35
  tt = t;
36
  return hack (t, e);
37
}
38
 
39
void *
40
test2 (struct dummy *t)
41
{
42
  struct dummy *tt;
43
  const enum dummy_enum *e;
44
  tt = t;
45
  return hack (t, e);
46
}
47
 
48
 
49
struct dummy {
50
 int x;
51
 int y;
52
 double b;
53
} tag_dummy;
54
 
55
enum dummy_enum {
56
  enum1,
57
  enum2
58
};
59
 
60
void *
61
hack (const struct dummy *t, const enum dummy_enum *e)
62
{
63
  return (void *) t;
64
}
65
 
66
int
67
main ()
68
{
69
  struct dummy tt;
70
  tt.x = 5;
71
  tt.y = 25;
72
  tt.b = 2.5;
73
  test2 (&tt);
74
  test (&tt);
75
  return 0;
76
}

powered by: WebSVN 2.1.0

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