<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=windows-1252">
</head>
<body text="#000000" bgcolor="#FFFFFF">
<br>
<div class="moz-forward-container">-------- Forwarded Message
--------
<table class="moz-email-headers-table" cellpadding="0"
cellspacing="0" border="0">
<tbody>
<tr>
<th nowrap="nowrap" valign="BASELINE" align="RIGHT">Subject:
</th>
<td>[PATCH 2/3] GCC 5.0 expands note messages up to 3 line</td>
</tr>
<tr>
<th nowrap="nowrap" valign="BASELINE" align="RIGHT">Date: </th>
<td>Wed, 23 Mar 2016 11:13:04 +0100</td>
</tr>
<tr>
<th nowrap="nowrap" valign="BASELINE" align="RIGHT">From: </th>
<td>Thierry Fauck <a class="moz-txt-link-rfc2396E" href="mailto:thierry.fauck@fr.ibm.com"><thierry.fauck@fr.ibm.com></a></td>
</tr>
<tr>
<th nowrap="nowrap" valign="BASELINE" align="RIGHT">To: </th>
<td><a class="moz-txt-link-abbreviated" href="mailto:ltrace-devel@lists.alioth.debian.org">ltrace-devel@lists.alioth.debian.org</a></td>
</tr>
<tr>
<th nowrap="nowrap" valign="BASELINE" align="RIGHT">CC: </th>
<td><br>
</td>
</tr>
</tbody>
</table>
<br>
<br>
<pre>From: Thierry Fauck <a class="moz-txt-link-rfc2396E" href="mailto:tfauck@free.fr"><tfauck@free.fr></a>
This patch avoid GGC note message to prevent test compilation
modified: testsuite/lib/ltrace.exp
Signed-off-by: Thierry Fauck <a class="moz-txt-link-rfc2396E" href="mailto:tfauck@free.fr"><tfauck@free.fr></a>
---
testsuite/lib/ltrace.exp | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/testsuite/lib/ltrace.exp b/testsuite/lib/ltrace.exp
index 95263b9..4be2093 100644
--- a/testsuite/lib/ltrace.exp
+++ b/testsuite/lib/ltrace.exp
@@ -124,7 +124,10 @@ proc ltrace_compile {source dest type options} {
set result [target_compile $source $dest $type $options];
verbose "result is $result"
- regsub ".* note: .*$" "$result" "" result;
+ if { [regexp "note:.*ABI.*float " $result ] >= 1 } {
+ verbose "Ignoring ABI GCC note"
+ regsub "^.*\[\r\n\]*.*\[\r\n\]*.*\[\r\n\]*" $result "" result
+ }
regsub "\[\r\n\]*$" "$result" "" result;
regsub "^\[\r\n\]*" "$result" "" result;
if { $result != "" && [lsearch $options quiet] == -1} {
--
2.7.0
</pre>
<br>
</div>
<br>
</body>
</html>