Browse Source

Fixed compilation after r43281

git-svn-id: trunk@43282 -
marcus 5 years ago
parent
commit
e833876f05
1 changed files with 1 additions and 1 deletions
  1. 1 1
      rtl/inc/iso7185.pp

+ 1 - 1
rtl/inc/iso7185.pp

@@ -256,7 +256,7 @@ unit iso7185;
       begin
         if c>=0.0 then
           Round:=Trunc(c+0.5)
-        else R
+        else
           Round:=Trunc(c-0.5);
       end;
 {$endif FPUNONE}