[libcw-cvs] [CVS] Module src

[Carlo W. <li...@us...>]

CVSROOT    : /cvsroot/libcw
Module     : src
Commit time: 2002-00-09 01:18:12 UTC

Modified files:
     libcwd/testsuite/lib/libcwd.exp

Log message:

Bug fix.

---------------------- diff included ----------------------
Index: src/libcwd/testsuite/lib/libcwd.exp
diff -u src/libcwd/testsuite/lib/libcwd.exp:1.10 src/libcwd/testsuite/lib/libcwd.exp:1.11
--- src/libcwd/testsuite/lib/libcwd.exp:1.10	Tue Jan  8 17:00:18 2002
+++ src/libcwd/testsuite/lib/libcwd.exp	Tue Jan  8 17:18:02 2002
@@ -69,9 +69,9 @@
     # Kludge to remove linker _warnings_ from output.
     # The expected from is: /usr/lib/libc.so.4: warning: ...
     #                   or: /usr/lib/libc.so.4: WARNING! ...
-    regsub -- "\[._/a-zA-Z0-9 :\]*: \[Ww\]\[Aa\]\[Rr\]\[Nn\]\[Ii\]\[Nn\]\[Gg\]\[!:\]\[`'.,!_/a-zA-Z0-9 ():;\]*." "$compileroutput" "" compileroutput
-    # Remove final new-line at the end if any:
-    regsub -- "\[^`'.,!_/a-zA-Z0-9 ():;\]$" "$compileroutput" "" compileroutput
+    regsub -all -line -nocase -- "^.*: warning\[!:\].*$" "$compileroutput" "" compileroutput
+    # Finally remove all new-lines if any:
+    regsub -- "^\[^`'.,!_/a-zA-Z0-9 ():;\]*$" "$compileroutput" "" compileroutput
     verbose "Filtered compiler output is: `$compileroutput'"
 
     if { "$compileroutput" != "" } {
----------------------- End of diff -----------------------