* binutils-all/objcopy.exp: Accept main as a data symbol as well.
authorJakub Jelinek <jakub@redhat.com>
Tue, 30 Mar 2004 09:54:15 +0000 (09:54 +0000)
committerJakub Jelinek <jakub@redhat.com>
Tue, 30 Mar 2004 09:54:15 +0000 (09:54 +0000)
binutils/testsuite/ChangeLog
binutils/testsuite/binutils-all/objcopy.exp

index 6c8de84dad606f7869a998236b08ac7a32b636e9..8c4665e1b7dac937bf49c0f59b6946cddbd3254e 100644 (file)
@@ -1,3 +1,7 @@
+2004-03-30  Jakub Jelinek  <jakub@redhat.com>
+
+       * binutils-all/objcopy.exp: Accept main as a data symbol as well.
+
 2004-02-27  Andreas Schwab  <schwab@suse.de>
 
        * binutils-all/ar.exp (argument_parsing): New test.
index c6a2d530e3eec3c9c0782ca6d79ea2be0af6e5e9..e84868bba31c8627589d796ccef740610dcb1e72 100644 (file)
@@ -613,8 +613,8 @@ proc strip_executable_with_saving_a_symbol { prog flags test } {
        regsub "^\[0-9a-fA-F\]+\[ \]+T Main\[\n\r\]+" $exec_output "" exec_output
     }
 
-    if {![regexp {^[0-9a-fA-F]+ T main} $exec_output] \
-         && ![regexp {^[0-9a-fA-F]+ T _main} $exec_output]} {
+    if {![regexp {^([0-9a-fA-F]+)?[ ]+[TD] main} $exec_output] \
+         && ![regexp {^([0-9a-fA-F]+)?[ ]+[TD] _main} $exec_output]} {
        fail $test
        return
     }