-# Copyright 2008-2017 Free Software Foundation, Inc.
+# Copyright 2008-2020 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
runto "assign.adb:$bp_location"
gdb_test "p q" \
- "= \\(2, 3, 5, 7, 11\\)" \
- "p q"
+ "= \\(2, 3, 5, 7, 11\\)"
gdb_test_no_output "set \$addr := q'address" \
"save q'address in convenience variable"
"set {Integer} \$addr := 19"
gdb_test "p q" \
- "= \\(19, 3, 5, 7, 11\\)" \
- "p q"
-
-
-
+ "= \\(19, 3, 5, 7, 11\\)"