diff options
Diffstat (limited to 'gdb/testsuite/gdb.base/print-file-var.exp')
-rw-r--r-- | gdb/testsuite/gdb.base/print-file-var.exp | 55 |
1 files changed, 55 insertions, 0 deletions
diff --git a/gdb/testsuite/gdb.base/print-file-var.exp b/gdb/testsuite/gdb.base/print-file-var.exp new file mode 100644 index 0000000..67c3ac4 --- /dev/null +++ b/gdb/testsuite/gdb.base/print-file-var.exp @@ -0,0 +1,55 @@ +# 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/>. */ + +set executable print-file-var-main + +set lib1 "print-file-var-lib1" +set lib2 "print-file-var-lib2" + +set libobj1 "${objdir}/${subdir}/${lib1}.so" +set libobj2 "${objdir}/${subdir}/${lib2}.so" + +set lib_opts { debug additional_flags=-fPIC } + +if { [gdb_compile_shlib ${srcdir}/${subdir}/${lib1}.c \ + ${libobj1} \ + ${lib_opts} ] != "" } { + return -1 +} +if { [gdb_compile_shlib ${srcdir}/${subdir}/${lib2}.c \ + ${libobj2} \ + ${lib_opts} ] != "" } { + return -1 +} +if { [gdb_compile "${srcdir}/${subdir}/${executable}.c" \ + "${objdir}/${subdir}/${executable}" \ + executable \ + [list debug shlib=${libobj1} shlib=${libobj2}]] + != ""} { + return -1 +} + +clean_restart $executable + +if ![runto_main] { + untested "could not run to main" + return -1 +} + +gdb_test "print 'print-file-var-lib1.c'::this_version_id" \ + " = 104" + +gdb_test "print 'print-file-var-lib2.c'::this_version_id" \ + " = 203" |