2003-09-09 Dave Brolley <brolley@redhat.com>
authorDave Brolley <brolley@redhat.com>
Tue, 9 Sep 2003 22:34:53 +0000 (22:34 +0000)
committerDave Brolley <brolley@redhat.com>
Tue, 9 Sep 2003 22:34:53 +0000 (22:34 +0000)
        * sim/frv/maddaccs.cgs: move to fr400 subdirectory.
        * sim/frv/msubaccs.cgs: move to fr400 subdirectory.
        * sim/frv/masaccs.cgs: move to fr400 subdirectory.

sim/testsuite/ChangeLog
sim/testsuite/lib/sim-defs.exp
sim/testsuite/sim/frv/fr400/maddaccs.cgs [moved from sim/testsuite/sim/frv/maddaccs.cgs with 99% similarity]
sim/testsuite/sim/frv/fr400/masaccs.cgs [moved from sim/testsuite/sim/frv/masaccs.cgs with 99% similarity]
sim/testsuite/sim/frv/fr400/msubaccs.cgs [moved from sim/testsuite/sim/frv/msubaccs.cgs with 99% similarity]

index 423cffd..56b16f3 100644 (file)
@@ -1,3 +1,9 @@
+2003-09-09  Dave Brolley  <brolley@redhat.com>
+
+       * sim/frv/maddaccs.cgs: move to fr400 subdirectory.
+       * sim/frv/msubaccs.cgs: move to fr400 subdirectory.
+       * sim/frv/masaccs.cgs: move to fr400 subdirectory.
+
 2003-09-03  Michael Snyder  <msnyder@redhat.com>
 
        * sim/frv/fr500/mclracc.cgs: Change mach to 'all', to be
index 42374e0..017fcef 100644 (file)
@@ -331,20 +331,20 @@ proc slurp_options { file } {
     # whitespace is ignored anywhere except within the options list;
     # option names are alphabetic only
     set pat "^#${ws}(\[a-zA-Z\]*)\\(?(\[^):\]*)\\)?$ws:${ws}(.*)$ws\$"
-    # Allow comment as first line of file.
-    set firstline 1
+    # Allow arbitrary lines until the first option is seen.
+    set seen_opt 0
     while { [gets $f line] != -1 } {
        set line [string trim $line]
        # Whitespace here is space-tab.
        if [regexp $pat $line xxx opt_name opt_machs opt_val] {
            # match!
            lappend opt_array [list $opt_name $opt_machs $opt_val]
+           set seen_opt 1
        } else {
-           if { ! $firstline } {
+           if { $seen_opt } {
                break
            }
        }
-       set firstline 0
     }
     close $f
     return $opt_array
similarity index 99%
rename from sim/testsuite/sim/frv/maddaccs.cgs
rename to sim/testsuite/sim/frv/fr400/maddaccs.cgs
index aa178fe..98659c4 100644 (file)
@@ -1,7 +1,7 @@
 # frv testcase for maddaccs $ACC40Si,$ACC40Sk
 # mach: fr400
 
-       .include "testutils.inc"
+       .include "../testutils.inc"
 
        start
 
similarity index 99%
rename from sim/testsuite/sim/frv/masaccs.cgs
rename to sim/testsuite/sim/frv/fr400/masaccs.cgs
index 7369a71..8fbde91 100644 (file)
@@ -1,7 +1,7 @@
 # frv testcase for masaccs $ACC40Si,$ACC40Sk
 # mach: fr400
 
-       .include "testutils.inc"
+       .include "../testutils.inc"
 
        start
 
similarity index 99%
rename from sim/testsuite/sim/frv/msubaccs.cgs
rename to sim/testsuite/sim/frv/fr400/msubaccs.cgs
index f793e9a..f0aba1d 100644 (file)
@@ -1,7 +1,7 @@
 # frv testcase for msubaccs $ACC40Si,$ACC40Sk
 # mach: fr400
 
-       .include "testutils.inc"
+       .include "../testutils.inc"
 
        start