re PR testsuite/10819 (testsuite creates CR+LF on compiler version lines in test summary files)

2003-12-09  Robert Schiele  <rschiele@uni-mannheim.de>

        PR other/10819
        * lib/gcc.exp (default_gcc_version): Do not match NL/CR characters
        to fix Bug 10819.
        * lib/g++.exp (g++_version): Likewise.
        * lib/g77.exp (g77_version): Likewise.
        * lib/objc.exp (default_objc_version): Likewise.

From-SVN: r74507
This commit is contained in:
Robert Schiele 2003-12-10 20:36:02 +00:00 committed by Andrew Pinski
parent 3090572ce2
commit 729c1f7a6a
5 changed files with 13 additions and 4 deletions

View File

@ -1,3 +1,12 @@
2003-12-09 Robert Schiele <rschiele@uni-mannheim.de>
PR other/10819
* lib/gcc.exp (default_gcc_version): Do not match NL/CR characters
to fix Bug 10819.
* lib/g++.exp (g++_version): Likewise.
* lib/g77.exp (g77_version): Likewise.
* lib/objc.exp (default_objc_version): Likewise.
2003-12-10 Richard Earnshaw <rearnsha@arm.com>
* arm.md: New split patterns for optimizing bitfield accesses.

View File

@ -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.*$" $output version
regexp "version\[^\n\r\]*" $output version
if { $status == 0 && [info exists version] } then {
if [is_remote host] {
clone_output "$compiler $version\n"

View File

@ -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.*$" $output version
regexp "version\[^\n\r\]*" $output version
if { $status == 0 && [info exists version] } then {
if [is_remote host] {
clone_output "$compiler $version\n"

View File

@ -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.*$" $output version
regexp "version\[^\n\r\]*" $output version
if { $status == 0 && [info exists version] } then {
clone_output "$compiler_name $version\n"
} else {

View File

@ -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.*$" $output version
regexp "version\[^\n\r\]*" $output version
if { $status == 0 && [info exists version] } then {
clone_output "$compiler_name $version\n"
} else {