2003-05-01 Chris Demetriou <cgd@broadcom.com>

        * gas/mips/mips.exp (mips_arch_init): New function.
        Call it before setting up architecture array entries.

diff --git a/gas/testsuite/ChangeLog b/gas/testsuite/ChangeLog
index 7abb1321f221475d26cbe2fac9eff85e1ddc8916..93c22dd4c3fe7c83ca57898ebe87f417a452b7f8 100644 (file)
--- a/gas/testsuite/ChangeLog
+++ b/gas/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2003-05-01  Chris Demetriou  <cgd@broadcom.com>
+
+       * gas/mips/mips.exp (mips_arch_init): New function.
+       Call it before setting up architecture array entries.
+
 2003-05-01  H.J. Lu <hjl@gnu.org>
 
        * gas/elf/elf.exp (run_list_test): Accept empty $opts.

diff --git a/gas/testsuite/gas/mips/mips.exp b/gas/testsuite/gas/mips/mips.exp
index 6557343fcf6748493605870a484fb4bfeea7c863..2208b1c7c8678591144571184449848d90acd8e4 100644 (file)
--- a/gas/testsuite/gas/mips/mips.exp
+++ b/gas/testsuite/gas/mips/mips.exp
@@ -78,6 +78,15 @@
 # based on the target of the assembler being built.  If always has
 # empty "as_flags" and "objdump_flags."
 
+# mips_arch_init
+#
+# This function initializes the architecture data array ("mips_arches")
+# to be empty.
+proc mips_arch_init {} {
+    global mips_arches
+    array unset mips_arches
+}
+
 # mips_arch_create ARCH GPRSIZE EXTENDS PROPS AS_FLAGS OBJDUMP_FLAGS \
 #                 (optional:) DEFAULT_FOR_TARGETS
 #
@@ -334,6 +343,7 @@ proc run_list_test_arches { name opts arch_list } {
 # Note that several targets pick default CPU based on ABI.  We
 # can't easily handle that; do NOT list those targets as defaulting
 # to any architecture.
+mips_arch_init
 mips_arch_create mips1         32      {}      {} \
                        { -march=mips1 -mtune=mips1 } { -mmips:3000 }
 mips_arch_create mips2         32      mips1   { gpr_ilocks } \