1 C Test program for common block debugging. G. Helffrich 11 July 2004.
3 C { dg-skip-if "DWARF-2 only" { "*-*-*" } { "*" } { "-gdwarf-2" } }
28 C { dg-final { scan-assembler "(DIE.*DW_TAG_common_block)" } }
29 C { dg-final { scan-assembler "DW_AT_name: \"__BLNK__\"" } }
30 C { dg-final { scan-assembler "(DIE.*DW_TAG_variable)" } }
31 C { dg-final { scan-assembler "\"i.*\".*DW_AT_name" } }
32 C { dg-final { scan-assembler "\"j.*\".*DW_AT_name" } }
33 C { dg-final { scan-assembler "(DIE.*DW_TAG_common_block)" } }
34 C { dg-final { scan-assembler "DW_AT_name: \"label\"" } }
35 C { dg-final { scan-assembler "(DIE.*DW_TAG_variable)" } }
36 C { dg-final { scan-assembler "\"l.*\".*DW_AT_name" } }
37 C { dg-final { scan-assembler "\"m.*\".*DW_AT_name" } }