URL
https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk
Subversion Repositories openrisc_me
[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gcc.dg/] [debug/] [pr35154.c] - Rev 298
Compare with Previous | Blame | View Log
/* Test to make sure that stabs for C symbols that go into .comm have the proper structure. These should be lettered G for the struct that gives the name to the .comm, and should be V or S for .lcomm symbols. */ static char i_outer; struct { char f1; char f2; } opta; struct { char f1; char f2; } optb; int main() { static char i_inner[2]; i_inner[0] = 'a'; i_inner[1] = 'b'; opta.f1 = 'c'; opta.f2 = 'd'; optb.f1 = 'C'; optb.f2 = 'D'; i_outer = 'e'; /* { dg-do compile } */ /* { dg-skip-if "No stabs" { mmix-*-* *-*-netware* alpha*-*-* hppa*64*-*-* ia64-*-* *-*-vxworks* } { "*" } { "" } } */ /* { dg-skip-if "stabs only" { *-*-* } { "*" } { "-gstabs" } } */ return 0; } /* { dg-final { scan-assembler ".stabs.*i_inner:V" } } */ /* { dg-final { scan-assembler ".stabs.*i_outer:S" } } */ /* { dg-final { scan-assembler ".stabs.*opta:G" } } */ /* { dg-final { scan-assembler ".stabs.*optb:G" } } */