paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-14 18:29:13 +02:00
Code Issues Packages Projects Releases Wiki Activity

* cleanup

Browse Source 
git-svn-id: trunk@47522 -
This commit is contained in:
florian 2020-11-21 21:58:30 +00:00
parent ea11517d27
commit d5dcf5cd7a
1 changed files with 1 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
compiler/ncnv.pas
View File

@ -2957,10 +2957,7 @@ implementation
(not(n.nodetype in [modn,divn]) or (not(gotminus1))) (not(n.nodetype in [modn,divn]) or (not(gotminus1)))
) or ) or
{ in case of div/mod, the result of that division/modulo can ((((n.nodetype=andn) and wasoriginallysmallerint(tbinarynode(n).left)) or
usually be different in 32 and 64 bit }
(not gotdivmod and
(((n.nodetype=andn) and wasoriginallysmallerint(tbinarynode(n).left)) or
((n.nodetype=andn) and wasoriginallysmallerint(tbinarynode(n).right)))); ((n.nodetype=andn) and wasoriginallysmallerint(tbinarynode(n).right))));
end; end;
else else