Ver código fonte

* Fix spurious warning of already specified -t

Michael VAN CANNEYT 2 anos atrás
pai
commit
e9d7a6ed34
1 arquivos alterados com 1 adições e 1 exclusões
  1. 1 1
      compiler/options.pas

+ 1 - 1
compiler/options.pas

@@ -2760,7 +2760,7 @@ begin
                  Message1(option_missing_arg,'-t')
                else
                  begin
-                 if More<>upper(self.parasubtarget) then
+                 if (self.parasubtarget<>'') and (More<>upper(self.parasubtarget)) then
                     Message1(option_subtarget_is_already_set,self.parasubtarget)
                  else
                     self.parasubtarget:=more;