diff options
| author | Reid Spencer <rspencer@reidspencer.com> | 2007-04-14 18:51:19 +0000 |
|---|---|---|
| committer | Reid Spencer <rspencer@reidspencer.com> | 2007-04-14 18:51:19 +0000 |
| commit | b7c5957e7c64ce75471b6b43f0871e002b987b2e (patch) | |
| tree | 86313806c725abe8d10344db94cfed7ca683a1de /llvm/test/lib | |
| parent | 2441c0ae3e4cebe0872ff8ebcf2c4c59a98f04c0 (diff) | |
| download | bcm5719-llvm-b7c5957e7c64ce75471b6b43f0871e002b987b2e.tar.gz bcm5719-llvm-b7c5957e7c64ce75471b6b43f0871e002b987b2e.zip | |
1. Don't generate redundant copy of stderr
2. Only match \ at the *end* of a line.
llvm-svn: 36007
Diffstat (limited to 'llvm/test/lib')
| -rw-r--r-- | llvm/test/lib/llvm.exp | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/llvm/test/lib/llvm.exp b/llvm/test/lib/llvm.exp index dd0525bf8ce..acfc911565e 100644 --- a/llvm/test/lib/llvm.exp +++ b/llvm/test/lib/llvm.exp @@ -5,7 +5,7 @@ proc execOneLine { test outcome lineno line } { if { $retval != 0 } { set code [lindex $::errorCode 0] set lineno [expr $lineno + 1] - set errmsg " at RUN: line $lineno\n$::errorInfo\n$errmsg" + set errmsg " at RUN: line $lineno\n$::errorInfo" switch "$code" { CHILDSTATUS { set status [lindex $::errorCode 2] @@ -101,7 +101,7 @@ proc llvm-runtest { programs } { #see if this is our run line if {[regexp {END.[ *]$} $line match endofscript]} { break - } elseif {[regexp {RUN: *([^\\]+)(\\)} $line match oneline suffix]} { + } elseif {[regexp {RUN: *([^\\]+)(\\)$} $line match oneline suffix]} { set runline "$runline$oneline " } elseif {[regexp {RUN: *([^&]+)(&&)?} $line match oneline suffix]} { set runline "$runline$oneline" |
