Преглед на файлове

* 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
           skipnext:=true;
         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
         begin
           { option Param not handled }