From 3b1e54df460ca3280260692c647072bf5a5468a8 Mon Sep 17 00:00:00 2001
From: Ian Lance Taylor <ian@airs.com>
Date: Tue, 1 Oct 1996 19:53:02 +0000
Subject: 	* lib/ld.exp (default_ld_version): Fix for current version 
 printing.

---
 ld/testsuite/lib/ld.exp | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

(limited to 'ld/testsuite/lib')

diff --git a/ld/testsuite/lib/ld.exp b/ld/testsuite/lib/ld.exp
index 820824d..849a6d8 100644
--- a/ld/testsuite/lib/ld.exp
+++ b/ld/testsuite/lib/ld.exp
@@ -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"
     }
 }
 
-- 
cgit v1.1