* lib/gdb.exp (gdb_run_cmd): Move comment out from between expect

patterns, since that is not a valid context for comments.

gdb/testsuite/ChangeLog

@@ -1,3 +1,13 @@
+Tue Aug 23 19:14:06 1994  Stan Shebs  (shebs@andros.cygnus.com)
+
+	* lib/gdb.exp (gdb_run_cmd): Move comment out from between expect
+	patterns, since that is not a valid context for comments.
+
+Fri Aug 19 15:07:30 1994  Kung Hsu  (kung@mexican.cygnus.com)
+
+	* gdb.c++/demangle.exp (test_arm_style_demangling): Add tests for
+	repeated types and repeated types with indices > 9.
+
 Tue Aug 16 15:57:52 1994  Stan Shebs  (shebs@andros.cygnus.com)
 
 	* gdb.base/printcmds.exp: Remove all the a29k XFAILs tagged with

gdb/testsuite/lib/gdb.exp

@@ -113,7 +113,11 @@ proc delete_breakpoints {} {
 
 
 #
+# Generic run command.
 #
+# The second pattern below matches up to the first newline *only*.
+# Using ``.*$'' could swallow up output that we attempt to match
+# elsewhere.
 #
 proc gdb_run_cmd {} {
     send "run\n"
@@ -122,10 +126,6 @@ proc gdb_run_cmd {} {
 	    send "y\n"
 	    exp_continue
 	}
-
-	# The following pattern matches up to to the first newline *only*.
-	# Using ``.*$'' could swallow up output that we attempt to match
-	# elsewhere.
 	-re "Starting program: \[^\n\]*" {}
     }
 }
@@ -221,6 +221,7 @@ proc gdb_test { args } {
 
     set result -1
     set errmess ""
+    if ![string match $command ""] {
 	# trap the send so any problems don't crash things
 	catch "send \"$command\n\"" errmess
 	if [string match "write.spawn_id=\[0-9\]+.:" $errmess] then {
@@ -229,6 +230,7 @@ proc gdb_test { args } {
 	    gdb_start
 	    return -1
 	}
+    }
 
     expect {
 	-re ".*Ending remote debugging.*$prompt$" {