blob: 87011e4e41ab409c318113dd48fa44434d17b3f3 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
|
# Copyright 2008-2022 Free Software Foundation, Inc.
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 3 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program. If not, see <http://www.gnu.org/licenses/>.
standard_testfile .cc
if [get_compiler_info] {
return -1
}
if {[prepare_for_testing "failed to prepare" $testfile $srcfile {debug c++}]} {
return -1
}
############################################
# Test printing of namespace imported within the function.
if ![runto_main] then {
perror "couldn't run to breakpoint main"
continue
}
gdb_test "print _a" "= 1"
############################################
# Test printing of namespace imported into a scope containing the pc.
gdb_breakpoint [gdb_get_line_number "marker1 stop"]
gdb_continue_to_breakpoint "marker1 stop"
gdb_test "print _a" "= 1" "print _a in a nested scope"
############################################
# Test printing of namespace aliases.
gdb_breakpoint marker2
gdb_continue_to_breakpoint "marker2"
gdb_test "print B::_a" "= 1"
gdb_test "print _a" "No symbol \"_a\" in current context." \
"print _a in namespace alias scope"
gdb_test "print x" "No symbol \"x\" in current context." \
"print x in namespace alias scope"
############################################
# Test that names are not printed when they
# are not imported.
gdb_breakpoint marker3
gdb_continue_to_breakpoint "marker3"
# gcc-4-3 puts import statements for aliases in
# the global scope instead of the corresponding
# function scope. These wrong import statements throw
# this test off. This is fixed in gcc-4-4.
if [test_compiler_info gcc-4-3-*] then { setup_xfail *-*-* }
gdb_test "print _a" "No symbol \"_a\" in current context." \
"Print _a without import at marker3"
############################################
# Test printing of individually imported elements.
gdb_breakpoint marker4
gdb_continue_to_breakpoint "marker4"
gdb_test "print dx" "= 4"
############################################
# Test printing of namespace imported into file scope.
gdb_breakpoint marker5
gdb_continue_to_breakpoint "marker5"
gdb_test "print cc" "= 3"
# Also test printing of namespace aliases
gdb_test "print efx" "= 5"
############################################
# Test printing of variables imported from nested namespaces.
gdb_breakpoint I::marker7
gdb_continue_to_breakpoint "I::marker7"
gdb_test "print ghx" "= 6"
############################################
# Test that variables are not printed in a namespace that is sibling
# to the namespace containing an import.
gdb_breakpoint L::marker8
gdb_continue_to_breakpoint "L::marker8"
gdb_test "print jx" "= 44" \
"print jx when the symbol is available"
gdb_breakpoint "K::marker9"
gdb_continue_to_breakpoint "K::marker9"
gdb_test "print jx" "No symbol \"jx\" in current context." \
"print jx when the symbol is not available"
############################################
# Test that variables are only printed after the line containing the
# import.
gdb_breakpoint [gdb_get_line_number "marker10 stop"]
gdb_continue_to_breakpoint "marker10 stop"
if { [test_compiler_info {gcc-[0-3]-*}] ||
[test_compiler_info {gcc-4-[0-3]-*}]} {
setup_xfail *-*-*
}
# Assert that M::x is printed and not N::x
gdb_test "print x" "= 911" "print x (from M::x)"
|
