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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.dg/] [redecl-1.c] - Blame information for rev 149

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

Line No. Rev Author Line
1 149 jeremybenn 
/* Test for various situations where a new declaration of an
2 
   identifier conflicts with an earlier declaration which isn't in the
3 
   same scope.  These are all undefined behavior per C89 sections
4 
   6.1.2.2p7, 6.1.2.6p2, and 6.3.2.2p2/footnote 38 (C99 6.2.2p7 and
5 
   6.2.7p2 - implicit declarations are invalid in C99).  */
6 
 
7 
/* { dg-do compile } */
8 
/* { dg-options "-std=c89 -pedantic -Wall -Wno-unused" } */
9 
 
10 
/* Extern at function scope, clashing with extern at file scope */
11 
 
12 
extern int foo1;                /* { dg-error "previous" } */
13 
extern int bar1(int);           /* { dg-error "previous" } */
14 
 
15 
void test1(void)
16 
{
17 
  extern double foo1;           /* { dg-error "conflict" } */
18 
  extern double bar1(double);   /* { dg-error "conflict" } */
19 
}
20 
 
21 
/* Extern at file scope, clashing with extern at function scope */
22 
 
23 
void test2(void)
24 
{
25 
  extern double foo2;           /* { dg-error "previous" } */
26 
  extern double bar2(double);   /* { dg-error "previous" } */
27 
}
28 
 
29 
extern int foo2;                /* { dg-error "conflict" } */
30 
extern int bar2(int);           /* { dg-error "conflict" } */
31 
 
32 
/* Extern at function scope, clashing with extern at earlier function
33 
   scope.  Also, don't be fooled by a typedef at file scope.  */
34 
 
35 
typedef float baz3;             /* { dg-bogus } */
36 
 
37 
void prime3(void)
38 
{
39 
  extern int foo3;              /* { dg-error "previous" } */
40 
  extern int bar3(int);         /* { dg-error "previous" } */
41 
  extern int baz3;              /* { dg-error "previous" } */
42 
}
43 
 
44 
void test3(void)
45 
{
46 
  extern double foo3;           /* { dg-error "conflict" } */
47 
  extern double bar3(double);   /* { dg-error "conflict" } */
48 
  extern double baz3;           /* { dg-error "conflict" } */
49 
}
50 
 
51 
/* Extern at function scope, clashing with previous implicit decl.  */
52 
 
53 
void prime4(void)
54 
{
55 
  bar4();                       /* { dg-error "previous|implicit" } */
56 
}
57 
 
58 
void test4(void)
59 
{
60 
  extern double bar4(double);   /* { dg-error "conflict" } */
61 
}
62 
 
63 
/* Implicit decl, clashing with extern at previous function scope.  */
64 
 
65 
void prime5(void)
66 
{
67 
  extern double bar5(double);   /* { dg-error "previous" "" } */
68 
}
69 
 
70 
void test5(void)
71 
{
72 
  bar5(1);                      /* { dg-error "implicit" } */
73 
}
74 
 
75 
/* Extern then static, both at file scope.  */
76 
 
77 
extern int test6(int);          /* { dg-warning "previous" "" } */
78 
static int test6(int x)
79 
{ return x; }                   /* { dg-warning "follows non-static" } */
80 
 
81 
 
82 
/* Extern then static, extern at previous function scope.  */
83 
 
84 
void prime7(void)
85 
{
86 
  extern int test7(int);        /* { dg-warning "previous" "" } */
87 
}
88 
 
89 
static int test7(int x)
90 
{ return x; }                   /* { dg-warning "follows non-static" } */
91 
 
92 
/* Implicit decl then static.  */
93 
 
94 
void prime8(void)
95 
{
96 
  test8();                      /* { dg-warning "previous" "" } */
97 
                                /* { dg-warning "implicit" "implicit" { target *-*-* } 96 } */
98 
}
99 
 
100 
static int test8(int x)
101 
{ return x; }                   /* { dg-warning "follows non-static" } */

powered by: WebSVN 2.1.0

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