浏览代码

* Shorter form of copy, remark by Alexey Torgashin

Michaël Van Canneyt 2 年之前
父节点
当前提交
fd1f7b2ef8
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      compiler/utils/dummyas.pp

+ 1 - 1
compiler/utils/dummyas.pp

@@ -86,7 +86,7 @@ begin
       else if copy(param,1,4)='-fo=' then  
       else if copy(param,1,4)='-fo=' then  
         begin
         begin
         // Watcom
         // Watcom
-        object_name:=copy(param,5,length(Param)-4);
+        object_name:=copy(param,5);
         end
         end
       else if (Param[1]='-') then
       else if (Param[1]='-') then
         begin
         begin