Full view of interface-wide types

[deliverable/binutils-gdb.git] / gdb / testsuite / gdb.ada / ptype_tagged_param.exp

diff --git a/gdb/testsuite/gdb.ada/ptype_tagged_param.exp b/gdb/testsuite/gdb.ada/ptype_tagged_param.exp
index e538b980d484ed15f4c75fa9885c9ea2fd9814ee..98ee548035571c75cb15b4b8108554e11a14189a 100644 (file)
--- a/gdb/testsuite/gdb.ada/ptype_tagged_param.exp
+++ b/gdb/testsuite/gdb.ada/ptype_tagged_param.exp
@@ -31,6 +31,6 @@ set eol "\[\r\n\]+"
 set sp "\[ \t\]*"
 
 gdb_test "ptype s" \
-         "type = new pck.shape with record${eol}${sp}r: integer;${eol}end record" \
+         "type = <ref> new pck.shape with record${eol}${sp}r: integer;${eol}end record" \
          "ptype s"