Browse Source

* handle -Ca (as proposed by Michael Ring) and -Cf in the first option pass as well

git-svn-id: trunk@48668 -
florian 4 years ago
parent
commit
50bc387688
1 changed files with 1 additions and 1 deletions
  1. 1 1
      compiler/options.pas

+ 1 - 1
compiler/options.pas

@@ -1117,7 +1117,7 @@ begin
          (
          (
           ((length(opt)>1) and (opt[2] in ['i','d','v','T','u','n','X','l','U'])) or
           ((length(opt)>1) and (opt[2] in ['i','d','v','T','u','n','X','l','U'])) or
           ((length(opt)>3) and (opt[2]='F') and (opt[3]='e')) or
           ((length(opt)>3) and (opt[2]='F') and (opt[3]='e')) or
-          ((length(opt)>3) and (opt[2]='C') and (opt[3]='p')) or
+          ((length(opt)>3) and (opt[2]='C') and (opt[3] in ['a','f','p'])) or
           ((length(opt)>3) and (opt[2]='W') and (opt[3] in ['m','p']))
           ((length(opt)>3) and (opt[2]='W') and (opt[3] in ['m','p']))
          )
          )
         ) then
         ) then