X-Git-Url: https://git.libre-soc.org/?a=blobdiff_plain;f=boehm-gc%2Ftestsuite%2Flib%2Fboehm-gc.exp;h=d162035b63b2a7a6e80374def2d2fed7cf8689d1;hb=9e531d3749daaedb2bf86f277d86977cd5ba3101;hp=2376102e9bd57959d7ceec410892587bb893acbf;hpb=94ea609ab3bfbb3ccba25af4f8575a330ec2753e;p=gcc.git

diff --git a/boehm-gc/testsuite/lib/boehm-gc.exp b/boehm-gc/testsuite/lib/boehm-gc.exp
index 2376102e9bd..d162035b63b 100644
--- a/boehm-gc/testsuite/lib/boehm-gc.exp
+++ b/boehm-gc/testsuite/lib/boehm-gc.exp
@@ -27,9 +27,11 @@ load_gcc_lib wrapper.exp
 load_gcc_lib target-supports.exp
 # For dg-skip-if.
 load_gcc_lib target-supports-dg.exp
+load_gcc_lib target-utils.exp
 # For ${tool}_exit.
 load_gcc_lib gcc-defs.exp
 # For prune_gcc_output.
+load_gcc_lib multiline.exp
 load_gcc_lib prune.exp
 
 set dg-do-what-default run
@@ -233,7 +235,7 @@ proc boehm-gc-dg-prune { system text } {
     set text [prune_gcc_output $text]
 
     # Ignore harmless Darwin ranlib warnings.
-    regsub -all "(^|\n)(ranlib: file: \[^\n\]* has no symbols\n?)+" $text "\\1" text
+    regsub -all "(^|\n)(\[^\n\]*ranlib: file: \[^\n\]* has no symbols\n?)+" $text "\\1" text
 
     return $text
 }