mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-16 02:49:21 +02:00
* Typo in r27184.
git-svn-id: trunk@27196 -
This commit is contained in:
parent
b89822d3e9
commit
825900671b
@ -2760,7 +2760,7 @@ Procedure
|
|||||||
Begin
|
Begin
|
||||||
if ( zSign )<>0 then
|
if ( zSign )<>0 then
|
||||||
Begin
|
Begin
|
||||||
increment := flag(( roundingMode = float_round_down ) and (zSig2<>0);
|
increment := flag(( roundingMode = float_round_down ) and (zSig2<>0));
|
||||||
End
|
End
|
||||||
else
|
else
|
||||||
Begin
|
Begin
|
||||||
|
Loading…
Reference in New Issue
Block a user