소스 검색

* More option processing

Michaël Van Canneyt 2 년 전
부모
커밋
d3111517d5
1개의 변경된 파일5개의 추가작업 그리고 0개의 파일을 삭제
  1. 5 0
      compiler/utils/dummyas.pp

+ 5 - 0
compiler/utils/dummyas.pp

@@ -83,6 +83,11 @@ begin
           // ignore format in nasm
           // ignore format in nasm
           skipnext:=true;
           skipnext:=true;
         end
         end
+      else if copy(param,1,4)='-fo=' then  
+        begin
+        // Watcom
+        object_name:=copy(param,5,length(Param)-4);
+        end
       else if (Param[1]='-') then
       else if (Param[1]='-') then
         begin
         begin
           { option Param not handled }
           { option Param not handled }