diff options
author | Doug Evans <dje@google.com> | 2012-08-08 21:17:04 +0000 |
---|---|---|
committer | Doug Evans <dje@google.com> | 2012-08-08 21:17:04 +0000 |
commit | 4f485ebc90209b0bbe5e53cdec27ff15911b02ac (patch) | |
tree | 84a867fd9bdb2f43431ba263ffefade76089fdeb /gdb/testsuite/gdb.base/debug-expr.exp | |
parent | 2acf2b3959a79d3bf2ec680b182dc55cf702d688 (diff) |
* eval.c (evaluate_subexp_standard): Fix thinko in handling
UNOP_MEMVAL_TYPE.
* expprint.c (print_subexp_standard, case OP_TYPE): New.
(print_subexp_standard, case UNOP_CAST_TYPE): Don't increment pos.
(print_subexp_standard, case UNOP_DYNAMIC_CAST): Ditto.
(print_subexp_standard, case UNOP_REINTERPRET_CAST): Ditto.
(print_subexp_standard, case UNOP_MEMVAL_TYPE): Ditto.
(dump_subexp_body_standard, case UNOP_DYNAMIC_CAST): Don't increment
elt.
(dump_subexp_body_standard, case UNOP_REINTERPRET_CAST): Ditto.
(dump_subexp_body_standard, case UNOP_CAST_TYPE): Ditto.
(dump_subexp_body_standard, case UNOP_MEMVAL_TYPE): Ditto.
(dump_prefix_expression): Handle OP_TYPE.
testsuite/
* gdb.base/debug-expr.c: New file.
* gdb.base/debug-expr.exp: New file.
* gdb.base/exprs.exp: Test {type} casts.
* gdb.cp/debug-expr.exp: New file.
Diffstat (limited to 'gdb/testsuite/gdb.base/debug-expr.exp')
-rw-r--r-- | gdb/testsuite/gdb.base/debug-expr.exp | 52 |
1 files changed, 52 insertions, 0 deletions
diff --git a/gdb/testsuite/gdb.base/debug-expr.exp b/gdb/testsuite/gdb.base/debug-expr.exp new file mode 100644 index 0000000000..3066dcb8a4 --- /dev/null +++ b/gdb/testsuite/gdb.base/debug-expr.exp @@ -0,0 +1,52 @@ +# Copyright 2012 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/>. + +# Test "set debug expr 1" on c expressions. + +standard_testfile .c + +if {[prepare_for_testing $testfile.exp $testfile $srcfile {debug}]} { + return -1 +} + +if ![runto_main] { + fail "run to main" + return -1 +} + +# Test whether the expression debug machinery accepts the expression. + +proc test_debug_expr { cmd output } { + global gdb_prompt + + gdb_test_multiple $cmd "" { + -re ".*Invalid expression.*\r\n$gdb_prompt $" { + fail $cmd + } + -re ".*\[\r\n\]$output\r\n$gdb_prompt $" { + pass $cmd + } + } +} + +for { set i 0 } { $i < 4 } { incr i } { + gdb_test_no_output "set variable array\[$i\] = $i" +} + +gdb_test_no_output "set debug expression 1" + +# This caused gdb to segfault. +test_debug_expr "print /x {char\[4\]} array" \ + "\[$\]$decimal = \\{0x0, 0x1, 0x2, 0x3\\}" |