浏览代码

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

git-svn-id: trunk@43283 -
marcus 6 年之前
父节点
当前提交
d90741d2f2
共有 1 个文件被更改,包括 2 次插入2 次删除
  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}