1 # Copyright 2015-2020 Free Software Foundation, Inc.
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
5 # the Free Software Foundation; either version 3 of the License, or
6 # (at your option) any later version.
8 # This program is distributed in the hope that it will be useful,
9 # but WITHOUT ANY WARRANTY; without even the implied warranty of
10 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
11 # GNU General Public License for more details.
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/>.
16 # Virtual method/inheritance tests for GDB's C++ compile feature.
18 load_lib compile-support.exp
22 if {[skip_cplus_tests]} {
23 untested "skipping C++ tests"
27 if {[prepare_for_testing $testfile $testfile $srcfile \
28 {debug nowarnings c++}]} {
33 untested "could not run to main"
37 if {[skip_compile_feature_tests]} {
39 "compile command not supported (could not find libcc1 shared library?)"
43 gdb_breakpoint [gdb_get_line_number "break here" $srcfile]
44 gdb_continue_to_breakpoint "testing location"
46 CompileExpression::new "var"
47 CompileExpression::test "b.doit ()" 2
48 CompileExpression::test "c.doit ()" 3
49 CompileExpression::test "d.doit ()" 4
50 CompileExpression::test "ap->doit ()" 4
51 CompileExpression::test "b.doit2 ()" 22
52 CompileExpression::test "c.doit2 ()" 33
53 CompileExpression::test "d.doit2 ()" 44
54 CompileExpression::test "ap->doit2 ()" 44
55 CompileExpression::test "b.doit3 ()" -3
56 CompileExpression::test "c.doit3 ()" -3
57 CompileExpression::test "d.doit3 ()" -3
59 # These two tests are "disabled". They represent new/future features.
60 # CompileExpression::test \
61 [concat "struct ABC {int doit2() { return 3333; }} abc;" \
62 "var = abc.doit2()"] \
64 # CompileExpression::test \
65 [concat "struct ABC : A {int doit2() { return 4444; }} abc;" \
66 "var = abc.doit2()"] \
69 # Test some error conditions
70 gdb_test "compile code A a;" \
71 ".*cannot declare variable .a. to be of abstract type.*Compilation failed."