* lib/target.exp: Strip warnings about dangerous functions.

diff --git a/dejagnu/ChangeLog b/dejagnu/ChangeLog
index 31024c7..0270f33 100644 (file)
--- a/dejagnu/ChangeLog
+++ b/dejagnu/ChangeLog
@@ -1,3 +1,7 @@
+2000-02-15  Alexandre Oliva  <oliva@lsd.ic.unicamp.br>
+
+       * lib/target.exp: Strip warnings about dangerous functions.
+
 1999-12-14  Geoff Keating  <geoffk@cygnus.com>
 
        * baseboards/rom68k-idp.exp: Don't pass -nostdlib to the IDP

diff --git a/dejagnu/lib/target.exp b/dejagnu/lib/target.exp
index 1671a07..b4f876d 100644 (file)
--- a/dejagnu/lib/target.exp
+++ b/dejagnu/lib/target.exp
@@ -1,4 +1,4 @@
-# Copyright (C) 92, 93, 94, 95, 96, 97, 98, 1999 Free Software Foundation, Inc.
+# Copyright (C) 92, 93, 94, 95, 96, 97, 98, 1999, 2000 Free Software Foundation, Inc.
 
 # This program is free software; you can redistribute it and/or modify
 # it under the terms of the GNU General Public License as published by
@@ -261,6 +261,9 @@ proc prune_warnings { text } {
     regsub -all "(^|\n)(ld(|32|64): WARNING \[^\n\]*\n?)+" $text "\\1" text
     regsub -all "(^|\n)(ld(|32|64): Giving up.*Use -wall\[^\n\]*\n?)+" $text "\\1" text
 
+    # GNU ld warns about functions marked as dangerous in GNU libc.
+    regsub -all "(^|\n)\[^\n\]*: In function\[^\n\]*\n\[^\n\]\[^\n\]*function is dangerous*\[^\n\]*" $text "" text
+
     # It might be tempting to get carried away and delete blank lines, etc.
     # Just delete *exactly* what we're ask to, and that's it.
     return $text