aboutsummaryrefslogtreecommitdiff
path: root/gdb/testsuite/gdb.ada/py_range.exp
diff options
context:
space:
mode:
Diffstat (limited to 'gdb/testsuite/gdb.ada/py_range.exp')
-rw-r--r--gdb/testsuite/gdb.ada/py_range.exp7
1 files changed, 4 insertions, 3 deletions
diff --git a/gdb/testsuite/gdb.ada/py_range.exp b/gdb/testsuite/gdb.ada/py_range.exp
index f96beac..7adab65 100644
--- a/gdb/testsuite/gdb.ada/py_range.exp
+++ b/gdb/testsuite/gdb.ada/py_range.exp
@@ -1,4 +1,4 @@
-# Copyright 2013-2024 Free Software Foundation, Inc.
+# Copyright 2013-2025 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
@@ -38,10 +38,11 @@ gdb_test "python print(int(gdb.parse_and_eval('si')))" \
gdb_test "python print(int(gdb.parse_and_eval('ir')))" \
"974"
+# Accept "foo." prefix for older versions of GNAT.
gdb_test "python print(gdb.parse_and_eval('si').type)" \
- "foo\\.small_integer" "print type"
+ "(foo\\.)?small_integer" "print type"
gdb_test "python print(gdb.parse_and_eval('si').type.name)" \
- "foo\\.small_integer" "print type name"
+ "(foo\\.)?small_integer" "print type name"
gdb_test "python print(gdb.selected_inferior().main_name)" \
"_ada_foo" \