* gdb.asm/asm-source.exp (info symbol): Anchor the pattern

matching the entry point symbol's name at the beginning of the
line.

gdb/testsuite/ChangeLog

@@ -1,3 +1,9 @@
+2001-12-10  Jim Blandy  <jimb@redhat.com>
+
+	* gdb.asm/asm-source.exp (info symbol): Anchor the pattern
+ 	matching the entry point symbol's name at the beginning of the
+ 	line.
+
 2001-12-07  Daniel Jacobowitz  <drow@mvista.com>
 
 	* gdb.c++/classes.exp, gdb.c++/derivation.exp,

gdb/testsuite/gdb.asm/asm-source.exp

@@ -122,7 +122,10 @@ gdb_expect {
     -re "info symbol 0x$entry_point\[\r\n\]*" {
 	exp_continue
     }
-    -re "(.*) in section .*$gdb_prompt $" {
+    -re "^(.*) in section .*$gdb_prompt $" {
+        # It's important to anchor the pattern above at the beginning
+        # of the line.  Without that carat, the (.*) may end up
+        # matching the empty string.
 	set entry_symbol $expect_out(1,string)
 	pass "info symbol"
     }