diff options
Diffstat (limited to 'gdb/testsuite')
-rw-r--r-- | gdb/testsuite/ChangeLog | 6 | ||||
-rw-r--r-- | gdb/testsuite/gdb.arch/amd64-stap-wrong-subexp.S | 27 | ||||
-rw-r--r-- | gdb/testsuite/gdb.arch/amd64-stap-wrong-subexp.exp | 41 |
3 files changed, 74 insertions, 0 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 50c69ae..9fa19be 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,9 @@ +2014-09-05 Sergio Durigan Junior <sergiodj@redhat.com> + + PR gdb/17235 + * gdb.arch/amd64-stap-wrong-subexp.exp: New file. + * gdb.arch/amd64-stap-wrong-subexp.S: Likewise. + 2014-09-04 Sergio Durigan Junior <sergiodj@redhat.com> PR fortran/17237 diff --git a/gdb/testsuite/gdb.arch/amd64-stap-wrong-subexp.S b/gdb/testsuite/gdb.arch/amd64-stap-wrong-subexp.S new file mode 100644 index 0000000..2848462 --- /dev/null +++ b/gdb/testsuite/gdb.arch/amd64-stap-wrong-subexp.S @@ -0,0 +1,27 @@ +/* Copyright (C) 2014 Free Software Foundation, Inc. + + This file is part of GDB. + + 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/>. */ + +#include <sys/sdt.h> + + .file "amd64-stap-wrong-subexp.S" + .text + .globl main +main: + STAP_PROBE1(probe, foo, -4@$-3($4+$3)) + STAP_PROBE2(probe, bar, -4@-($4), -4@$-3+($22/$2)-$16) + xor %rax,%rax + ret diff --git a/gdb/testsuite/gdb.arch/amd64-stap-wrong-subexp.exp b/gdb/testsuite/gdb.arch/amd64-stap-wrong-subexp.exp new file mode 100644 index 0000000..5a1ad53 --- /dev/null +++ b/gdb/testsuite/gdb.arch/amd64-stap-wrong-subexp.exp @@ -0,0 +1,41 @@ +# Copyright 2014 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/>. + +if { ![istarget "x86_64-*-*"] || ![is_lp64_target] } { + verbose "Skipping amd64-stap-wrong-subexp.exp" + return +} + +standard_testfile amd64-stap-wrong-subexp.S + +if { [prepare_for_testing $testfile.exp $testfile $srcfile] } { + untested amd64-stap-wrong-subexp.exp + return -1 +} + +proc goto_probe { probe_name } { + if { ![runto "-pstap $probe_name"] } { + fail "run to probe $probe_name" + return + } +} + +goto_probe foo +gdb_test "print \$_probe_arg0" "Invalid operator `\\\(' on expression .*" \ + "print probe foo arg0" + +goto_probe bar +gdb_test "print \$_probe_arg0" " = -4" "print probe bar arg0" +gdb_test "print \$_probe_arg1" " = -8" "print probe bar arg1" |