OLD | NEW |
1 # Copyright 2007-2012 Free Software Foundation, Inc. | 1 # Copyright 2007-2012 Free Software Foundation, Inc. |
2 | 2 |
3 # This program is free software; you can redistribute it and/or modify | 3 # This program is free software; you can redistribute it and/or modify |
4 # it under the terms of the GNU General Public License as published by | 4 # it under the terms of the GNU General Public License as published by |
5 # the Free Software Foundation; either version 3 of the License, or | 5 # the Free Software Foundation; either version 3 of the License, or |
6 # (at your option) any later version. | 6 # (at your option) any later version. |
7 # | 7 # |
8 # This program is distributed in the hope that it will be useful, | 8 # This program is distributed in the hope that it will be useful, |
9 # but WITHOUT ANY WARRANTY; without even the implied warranty of | 9 # but WITHOUT ANY WARRANTY; without even the implied warranty of |
10 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | 10 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
11 # GNU General Public License for more details. | 11 # GNU General Public License for more details. |
12 # | 12 # |
13 # You should have received a copy of the GNU General Public License | 13 # You should have received a copy of the GNU General Public License |
14 # along with this program. If not, see <http://www.gnu.org/licenses/>. | 14 # along with this program. If not, see <http://www.gnu.org/licenses/>. |
15 load_lib dwarf.exp | 15 load_lib dwarf.exp |
16 | 16 |
17 # Test DW_TAG_compile_unit with no children and with neither DW_AT_low_pc nor | 17 # Test DW_TAG_compile_unit with no children and with neither DW_AT_low_pc nor |
18 # DW_AT_high_pc but with DW_AT_ranges instead. | 18 # DW_AT_high_pc but with DW_AT_ranges instead. |
19 | 19 |
20 # This test can only be run on targets which support DWARF-2 and use gas. | 20 # This test can only be run on targets which support DWARF-2 and use gas. |
21 if {![dwarf2_support]} { | 21 if {![dwarf2_support]} { |
22 verbose "Skipping DW_AT_ranges test." | 22 verbose "Skipping DW_AT_ranges test." |
23 return 0 | 23 return 0 |
24 } | 24 } |
25 | 25 |
26 # The .c files use __attribute__. | 26 # The .c files use __attribute__. |
27 if [get_compiler_info unused] { | 27 if [get_compiler_info] { |
28 return -1; | 28 return -1; |
29 } | 29 } |
30 if !$gcc_compiled { | 30 if !$gcc_compiled { |
31 verbose "Skipping DW_AT_ranges test." | 31 verbose "Skipping DW_AT_ranges test." |
32 return 0 | 32 return 0 |
33 } | 33 } |
34 | 34 |
35 set testfile "dw2-ranges" | 35 standard_testfile dw2-ranges.c dw2-ranges2.c dw2-ranges3.c |
36 set srcfile ${testfile}.c | 36 set asmfile [standard_output_file ${testfile}.s] |
37 set srcfile2 ${testfile}2.c | 37 set asmfile2 [standard_output_file ${testfile}2.s] |
38 set srcfile3 ${testfile}3.c | 38 set asmfile3 [standard_output_file ${testfile}3.s] |
39 set asmfile ${objdir}/${subdir}/${testfile}.s | 39 set objfile [standard_output_file ${testfile}.o] |
40 set asmfile2 ${objdir}/${subdir}/${testfile}2.s | 40 set objfile2 [standard_output_file ${testfile}2.o] |
41 set asmfile3 ${objdir}/${subdir}/${testfile}3.s | 41 set objfile3 [standard_output_file ${testfile}3.o] |
42 set objfile ${objdir}/${subdir}/${testfile}.o | |
43 set objfile2 ${objdir}/${subdir}/${testfile}2.o | |
44 set objfile3 ${objdir}/${subdir}/${testfile}3.o | |
45 set binfile ${objdir}/${subdir}/${testfile} | |
46 | 42 |
47 # Generate .s without debug info but provide debug info by the assembler. | 43 # Generate .s without debug info but provide debug info by the assembler. |
48 # This way we get DW_TAG_compile_unit DIE and only that DIE. | 44 # This way we get DW_TAG_compile_unit DIE and only that DIE. |
49 | 45 |
50 if {[gdb_compile "${srcdir}/${subdir}/${srcfile}" "${asmfile}" assembly {}] != "
" | 46 if {[gdb_compile "${srcdir}/${subdir}/${srcfile}" "${asmfile}" assembly {}] != "
" |
51 || [gdb_compile "${asmfile}" "${objfile}" object {additional_flags=-gdwarf-2
}] != "" } { | 47 || [gdb_compile "${asmfile}" "${objfile}" object {additional_flags=-gdwarf-2
}] != "" } { |
52 return -1 | 48 return -1 |
53 } | 49 } |
54 if {[gdb_compile "${srcdir}/${subdir}/${srcfile2}" "${asmfile2}" assembly {}] !=
"" | 50 if {[gdb_compile "${srcdir}/${subdir}/${srcfile2}" "${asmfile2}" assembly {}] !=
"" |
55 || [gdb_compile "${asmfile2}" "${objfile2}" object {additional_flags=-gdwarf
-2}] != "" } { | 51 || [gdb_compile "${asmfile2}" "${objfile2}" object {additional_flags=-gdwarf
-2}] != "" } { |
(...skipping 32 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
88 | 84 |
89 set test "info line main3" | 85 set test "info line main3" |
90 gdb_test_multiple $test $test { | 86 gdb_test_multiple $test $test { |
91 -re "Line \[0-9\]* of .* starts at address .* and ends at .*\r\n$gdb_prompt
$" { | 87 -re "Line \[0-9\]* of .* starts at address .* and ends at .*\r\n$gdb_prompt
$" { |
92 pass $test | 88 pass $test |
93 } | 89 } |
94 -re "Line \[0-9\]* of .* is at address .* but contains no code\\.\r\n$gdb_pr
ompt $" { | 90 -re "Line \[0-9\]* of .* is at address .* but contains no code\\.\r\n$gdb_pr
ompt $" { |
95 kfail symtab/12497 $test | 91 kfail symtab/12497 $test |
96 } | 92 } |
97 } | 93 } |
OLD | NEW |