* lib/ld.exp (default_ld_version): Fix for current version
authorIan Lance Taylor <ian@airs.com>
Tue, 1 Oct 1996 19:53:02 +0000 (19:53 +0000)
committerIan Lance Taylor <ian@airs.com>
Tue, 1 Oct 1996 19:53:02 +0000 (19:53 +0000)
printing.

ld/testsuite/lib/ld.exp

index 820824d07212812c056b6684ba3002e062375086..849a6d84afe139550d6dccfb3c187c5a31dfa126 100644 (file)
@@ -12,10 +12,9 @@ proc default_ld_version { ld } {
     
     catch "exec $ld --version" tmp
     set tmp [prune_system_crud $host_triplet $tmp]
-    regexp "version.*$" $tmp version
-    
-    if [info exists version] then {
-       clone_output "$ld $version\n"
+    regexp "\[^\n\]* (cygnus-|)(\[-0-9.a-zA-Z-\]+)\[\r\n\].*" $tmp version cyg number
+    if [info exists number] then {
+       clone_output "$ld $number\n"
     }
 }