================
@@ -777,6 +777,15 @@ void Flang::ConstructJob(Compilation &C, const JobAction 
&JA,
 
   addFortranDialectOptions(Args, CmdArgs);
 
+  // 'flang -E' always produces output that is suitable for use as fixed form
+  // Fortran. However it is only valid free form source if the original is also
+  // free form.
+  if (InputType == types::TY_PP_Fortran &&
+      !Args.hasArg(options::OPT_ffixed_form) &&
+      !Args.hasArg(options::OPT_ffree_form)) {
----------------
DavidTruby wrote:

I'm not seeing `getLastArg` here on the github review.. Is this github being 
weird?

https://github.com/llvm/llvm-project/pull/117563
_______________________________________________
cfe-commits mailing list
cfe-commits@lists.llvm.org
https://lists.llvm.org/cgi-bin/mailman/listinfo/cfe-commits

Reply via email to