Browse Source

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

git-svn-id: trunk@43283 -
marcus 5 years ago
parent
commit
d90741d2f2
1 changed files with 2 additions and 2 deletions
  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}