2003-11-23 Michael Chastain <mec@shout.net>

	Fix PR testsuite/1463.
	* gdb.base/structs.exp (start_structs_test): Call
	get_debug_format before using the debug format.

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 35fcaea6fb83210e6aa3d11e0cc82e7dda6f456f..30ac5f165bcbd37f3babf35801587ed7df69772a 100644 (file)
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,9 @@
+2003-11-23  Michael Chastain  <mec@shout.net>
+
+       Fix PR testsuite/1463.
+       * gdb.base/structs.exp (start_structs_test): Call
+       get_debug_format before using the debug format.
+
 2003-11-22  Andrew Cagney  <cagney@redhat.com>
 
        * lib/gdb.exp (gdb_test_multiple): Add simple example.

diff --git a/gdb/testsuite/gdb.base/structs.exp b/gdb/testsuite/gdb.base/structs.exp
index 7d399fd37eaf9e9dba616e346d3f924611fcc205..e623d91b359c7c348a1ec3cff5a70a5e4c0113d6 100644 (file)
--- a/gdb/testsuite/gdb.base/structs.exp
+++ b/gdb/testsuite/gdb.base/structs.exp
@@ -98,6 +98,9 @@ proc start_structs_test { types } {
        gdb_suppress_tests;
     }
 
+    # Get the debug format
+    get_debug_format
+
     # check that at the struct containing all the relevant types is correct
     set foo_t "type = struct struct[llength ${types}] \{"
     for {set n 0} {$n<[llength ${types}]} {incr n} {