gdb/testsuite/gdb.cp/nsnoimports.exp

   1 # Copyright 2011-2022 Free Software Foundation, Inc.
   2
   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.
   7 #
   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.
  12 #
  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/>.
  15
  16 standard_testfile .cc
  17
  18 if { [prepare_for_testing "failed to prepare" ${testfile} ${srcfile} {debug c++}] } {
  19      return -1
  20 }
  21
  22 ############################################
  23 if ![runto_main] then {
  24     perror "couldn't run to breakpoint main"
  25     return
  26 }
  27
  28 with_test_prefix "main scope" {
  29     gdb_test "print A::_a" "= 11"
  30     gdb_test "print A::B::ab" "= 22"
  31     gdb_test "print A::B::C::abc" "= 33"
  32
  33     gdb_test "print _a" "No symbol .* in current context."
  34     gdb_test "print ab" "No symbol .* in current context."
  35     gdb_test "print abc" "No symbol .* in current context."
  36 }
  37
  38 ############################################
  39 gdb_breakpoint A::B::first
  40 gdb_continue_to_breakpoint "A::B::first"
  41
  42 with_test_prefix "A::B::first scope" {
  43     gdb_test "print A::_a" "= 11"
  44     gdb_test "print A::B::ab" "= 22"
  45     gdb_test "print A::B::C::abc" "= 33"
  46
  47     gdb_test "print _a" "= 11"
  48     gdb_test "print ab" "= 22"
  49     gdb_test "print C::abc" "= 33"
  50
  51     gdb_test "print abc" "No symbol .* in current context."
  52 }
  53
  54 ############################################
  55 gdb_breakpoint A::B::C::second
  56 gdb_continue_to_breakpoint "A::B::C::second"
  57
  58 with_test_prefix "A::B::C::second scope" {
  59     gdb_test "print A::_a" "= 11"
  60     gdb_test "print A::B::ab" "= 22"
  61     gdb_test "print A::B::C::abc" "= 33"
  62
  63     gdb_test "print _a" "= 11"
  64     gdb_test "print ab" "= 22"
  65     gdb_test "print abc" "= 33"
  66 }
  67