re PR other/16043 ([3.4 only] gcc version not reported with…

re PR other/16043 ([3.4 only] gcc version not reported with "enable-version-specific-runtime-libs" to gcc-testresults)

2004-06-19  David Billinghurst (David.Billinghurst@riotinto.com)

	PR other/16043
	* lib/g++.exp (g++_version): Tweak regexp for version
	* lib/g77.exp (g77_version): Likewise
	* lib/gfortran.exp (gfortran_version): Likewise
	* lib/objc.exp (objc_version): Likewise
	* lib/treelang.exp (treelang_version): Likewise

From-SVN: r83374

gcc/testsuite/ChangeLog

+2004-06-19  David Billinghurst (David.Billinghurst@riotinto.com)
+
+	PR other/16043
+	* lib/g++.exp (g++_version): Tweak regexp for version
+	* lib/g77.exp (g77_version): Likewise
+	* lib/gfortran.exp (gfortran_version): Likewise
+	* lib/objc.exp (objc_version): Likewise
+	* lib/treelang.exp (treelang_version): Likewise
+
 2004-06-19  Jakub Jelinek  <jakub@redhat.com>
 
 	* gcc.dg/compat/struct-align-2_x.c: Include <limits.h>.

gcc/testsuite/lib/g++.exp

@@ -49,7 +49,7 @@ proc g++_version { } {
 	set tmp [remote_exec host "$compiler -v"]
 	set status [lindex $tmp 0];
 	set output [lindex $tmp 1];
-	regexp "version\[^\n\r\]*" $output version
+	regexp " version \[^\n\r\]*" $output version
 	if { $status == 0 && [info exists version] } then {
 	    if [is_remote host] {
 		clone_output "$compiler $version\n"

gcc/testsuite/lib/g77.exp

@@ -50,7 +50,7 @@ proc g77_version { } {
 	set tmp [remote_exec host "$compiler -v"]
 	set status [lindex $tmp 0];
 	set output [lindex $tmp 1];
-	regexp "version\[^\n\r\]*" $output version
+	regexp " version \[^\n\r\]*" $output version
 	if { $status == 0 && [info exists version] } then {
 	    if [is_remote host] {
 		clone_output "$compiler $version\n"

gcc/testsuite/lib/gcc.exp

@@ -56,7 +56,7 @@ proc default_gcc_version { } {
 	set tmp [remote_exec host "$compiler -v"]
 	set status [lindex $tmp 0];
 	set output [lindex $tmp 1];
-	regexp "version\[^\n\r\]*" $output version
+	regexp " version \[^\n\r\]*" $output version
 	if { $status == 0 && [info exists version] } then {
 	    clone_output "$compiler_name $version\n"
 	} else {

gcc/testsuite/lib/gfortran.exp

@@ -50,7 +50,7 @@ proc gfortran_version { } {
 	set tmp [remote_exec host "$compiler -v"]
 	set status [lindex $tmp 0];
 	set output [lindex $tmp 1];
-	regexp "version\[^\n\r\]*" $output version
+	regexp " version \[^\n\r\]*" $output version
 	if { $status == 0 && [info exists version] } then {
 	    if [is_remote host] {
 		clone_output "$compiler $version\n"

gcc/testsuite/lib/objc.exp

@@ -56,7 +56,7 @@ proc default_objc_version { } {
 	set tmp [remote_exec host "$compiler -v"]
 	set status [lindex $tmp 0];
 	set output [lindex $tmp 1];
-	regexp "version\[^\n\r\]*" $output version
+	regexp " version \[^\n\r\]*" $output version
 	if { $status == 0 && [info exists version] } then {
 	    clone_output "$compiler_name $version\n"
 	} else {

gcc/testsuite/lib/treelang.exp

@@ -61,7 +61,7 @@ proc default_treelang_version { } {
 	set tmp [remote_exec host "$compiler -v"]
 	set status [lindex $tmp 0];
 	set output [lindex $tmp 1];
-	regexp "version\[^\n\r\]*" $output version
+	regexp " version \[^\n\r\]*" $output version
 	if { $status == 0 && [info exists version] } then {
 	    clone_output "$compiler_name $version\n"
 	} else {