Bladeren bron

Fixed compilation after r43281 2nd try, some more "R"s

git-svn-id: trunk@43283 -
marcus 6 jaren geleden
bovenliggende
commit
d90741d2f2
1 gewijzigde bestanden met toevoegingen van 2 en 2 verwijderingen
  1. 2 2
      rtl/inc/iso7185.pp

+ 2 - 2
rtl/inc/iso7185.pp

@@ -267,7 +267,7 @@ unit iso7185;
       begin
         if c>=0.0 then
           round:=Trunc(c+0.5)
-        else R
+        else
           round:=Trunc(c-0.5);
       end;
 {$else not cpujvm}
@@ -275,7 +275,7 @@ unit iso7185;
       begin
         if c>=0.0 then
           round_comp:=Trunc(c+0.5)
-        else R
+        else
           round_comp:=Trunc(c-0.5);
       end;
 {$endif cpujvm}