<html>
<head>
<meta http-equiv="Content-Type" content="text/html;
charset=windows-1252">
</head>
<body>
<p>Sorry for being a bit slow - I've been doing my own work on x86.
I gave your patch (and new file) a test run on x86_64-win64, and
that seems to work fine. At least the warning messages in the
packages appear magenta. I'll give arm-linux a test next.<br>
</p>
<p>Gareth aka. Kit<br>
</p>
<div class="moz-cite-prefix">On 24/11/2020 01:21, J. Gareth Moreton
via fpc-devel wrote:<br>
</div>
<blockquote type="cite"
cite="mid:e49b9e19-8aaa-7ccd-2ae0-71db72e39a9e@moreton-family.com">
<meta http-equiv="Content-Type" content="text/html;
charset=windows-1252">
<p>I'm doing some optimisation development for x86_64 currently,
so I can give it a test run if you like - got the Raspberry Pi
for arm-linux and aarch64-linux too, but it might take more then
a day. I'll let you know.</p>
<p>Gareth aka. Kit<br>
</p>
<div class="moz-cite-prefix">On 24/11/2020 01:13, Tomas Hajny via
fpc-devel wrote:<br>
</div>
<blockquote type="cite"
cite="mid:0174d73e2d7e37848aa9a20f9988736c@hajny.biz">On
2020-11-24 01:14, J. Gareth Moreton via fpc-devel wrote: <br>
<blockquote type="cite">I'd say thie first port of call is
"compiler/comphook.pas", line 258: <br>
<br>
procedure WriteColoredOutput(var t: Text;color:
TOutputColor;const s : <br>
AnsiString); <br>
<br>
It looks like a simple "$if defined". <br>
</blockquote>
<br>
Yes, and the more platforms are added, the more messy this unit
gets. :-( I tried to clean it up a bit by moving the
platform-specific parts to a new unit - see the attachment
containing a diff for comphook.pas and the new unit. I didn't
commit yet because I couldn't test it on the other platforms (my
new implementation for OS/2 works OK ;-) ). If somebody tests is
under Linux and WinXX, I'll committ it tomorrow. <br>
<br>
Tomas <br>
<br>
<fieldset class="mimeAttachmentHeader"></fieldset>
<pre class="moz-quote-pre" wrap="">_______________________________________________
fpc-devel maillist - <a class="moz-txt-link-abbreviated" href="mailto:fpc-devel@lists.freepascal.org" moz-do-not-send="true">fpc-devel@lists.freepascal.org</a>
<a class="moz-txt-link-freetext" href="https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-devel" moz-do-not-send="true">https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-devel</a>
</pre>
</blockquote>
<div id="DAB4FAD8-2DD7-40BB-A1B8-4E2AA1F9FDF2"><br>
<table style="border-top: 1px solid #D3D4DE;">
<tbody>
<tr>
<td style="width: 55px; padding-top: 13px;"><a
href="https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=emailclient"
target="_blank" moz-do-not-send="true"><img
src="https://ipmcdn.avast.com/images/icons/icon-envelope-tick-round-orange-animated-no-repeat-v1.gif"
alt="" style="width: 46px; height: 29px;"
moz-do-not-send="true" width="46" height="29"></a></td>
<td style="width: 470px; padding-top: 12px; color:
#41424e; font-size: 13px; font-family: Arial, Helvetica,
sans-serif; line-height: 18px;">Virus-free. <a
href="https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=emailclient"
target="_blank" style="color: #4453ea;"
moz-do-not-send="true">www.avast.com</a> </td>
</tr>
</tbody>
</table>
<a href="#DAB4FAD8-2DD7-40BB-A1B8-4E2AA1F9FDF2" width="1"
height="1" moz-do-not-send="true"> </a></div>
<br>
<fieldset class="mimeAttachmentHeader"></fieldset>
<pre class="moz-quote-pre" wrap="">_______________________________________________
fpc-devel maillist - <a class="moz-txt-link-abbreviated" href="mailto:fpc-devel@lists.freepascal.org">fpc-devel@lists.freepascal.org</a>
<a class="moz-txt-link-freetext" href="https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-devel">https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-devel</a>
</pre>
</blockquote>
</body>
</html>