<HTML>
<style> BODY { font-family:Arial, Helvetica, sans-serif;font-size:12px; }</style>I reopened the bug ticket to attach a patch with the new function. It also contains some code for "Int" that passes through the input unchanged if its magnitude is greater than 2^52 (at this point, the precision means it can't have a fractional component). I've set it to "feedback" currently so Sven can determine if the patch is satisfactory.<br>
<br>
https://bugs.freepascal.org/view.php?id=33635<br>
<br>
Gareth aka. Kit<br>
<br>
<br>
<span style="font-weight: bold;">On Mon 30/04/18 02:12 , "Thorsten Engler" thorsten.engler@gmx.net sent:<br>
</span><blockquote style="BORDER-LEFT: #F5F5F5 2px solid; MARGIN-LEFT: 5px; MARGIN-RIGHT: 0px; PADDING-LEFT: 5px; PADDING-RIGHT: 0px"><span style="color: rgb(102, 102, 102);">> -----Original Message-----
</span><br>
<span style="color: rgb(102, 102, 102);">> From: fpc-devel <<a href="mailto:fpc-devel-bounces@lists.freepascal.org">fpc-devel-bounces@lists.freepascal.org</a>> On Behalf
</span><br>
<span style="color: rgb(102, 102, 102);">> Of Florian Klaempfl
</span><br>
<span style="color: rgb(102, 102, 102);">> Sent: Monday, 30 April 2018 04:28
</span><br>
<br>
<span style="color: rgb(102, 102, 102);">> > That ended up making things worse in some cases.
</span><br>
<span style="color: rgb(102, 102, 102);">>
</span><br>
<span style="color: rgb(102, 102, 102);">> Can you take a look at the generated machine code if delphi uses
</span><br>
<span style="color: rgb(102, 102, 102);">> proper multi byte nops. If not, the align might make things indeed
</span><br>
<span style="color: rgb(102, 102, 102);">> worse.
</span><br>
<br>
It does.
<br>
<br>
The problem was not the time required by the nops, but that for certain entry point alignments (among them the 16 byte alignments) the presence of this .align triggered the 3-4 times increase in processing time. I didn't look any closer into it as the version that J. Gareth worked out is faster and isn't alignment sensitive.
<br>
<br>
_______________________________________________
<br>
fpc-devel maillist - <a href="mailto:fpc-devel@lists.freepascal.org">fpc-devel@lists.freepascal.org</a>
<br>
<a target="_blank" href="<a href="http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-devel">http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-devel</a>"><span style="color: red;">http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-devel</span></a>
<br>
<br>
<br>
</blockquote></HTML>