diff --git a/clang/include/clang/Driver/Options.td b/clang/include/clang/Driver/Options.td index 0f0522410df6..19a0e238bdab 100644 --- a/clang/include/clang/Driver/Options.td +++ b/clang/include/clang/Driver/Options.td @@ -2157,7 +2157,7 @@ def fno_objc_nonfragile_abi : Flag<["-"], "fno-objc-nonfragile-abi">, Group, Group; def fomit_frame_pointer : Flag<["-"], "fomit-frame-pointer">, Group; -def fopenmp : Flag<["-"], "fopenmp">, Group, Flags<[CC1Option, NoArgumentUnused]>, +def fopenmp : Flag<["-"], "fopenmp">, Group, Flags<[CC1Option, NoArgumentUnused, FlangOption, FC1Option]>, HelpText<"Parse OpenMP pragmas and generate parallel code.">; def fno_openmp : Flag<["-"], "fno-openmp">, Group, Flags<[NoArgumentUnused]>; def fopenmp_version_EQ : Joined<["-"], "fopenmp-version=">, Group, Flags<[CC1Option, NoArgumentUnused]>; @@ -4232,6 +4232,8 @@ def ffixed_line_length_EQ : Joined<["-"], "ffixed-line-length=">, Group DocBrief<[{Set column after which characters are ignored in typical fixed-form lines in the source file}]>; def ffixed_line_length_VALUE : Joined<["-"], "ffixed-line-length-">, Group, Alias; +def fopenacc : Flag<["-"], "fopenacc">, Group, + HelpText<"Enable OpenACC">; } diff --git a/clang/lib/Driver/ToolChains/Flang.cpp b/clang/lib/Driver/ToolChains/Flang.cpp index dee2148c231c..c96b33ba1696 100644 --- a/clang/lib/Driver/ToolChains/Flang.cpp +++ b/clang/lib/Driver/ToolChains/Flang.cpp @@ -22,7 +22,8 @@ using namespace llvm::opt; void Flang::AddFortranDialectOptions(const ArgList &Args, ArgStringList &CmdArgs) const { Args.AddAllArgs(CmdArgs, {options::OPT_ffixed_form, options::OPT_ffree_form, - options::OPT_ffixed_line_length_EQ}); + options::OPT_ffixed_line_length_EQ, + options::OPT_fopenmp, options::OPT_fopenacc}); } void Flang::AddPreprocessingOptions(const ArgList &Args, diff --git a/flang/include/flang/Frontend/CompilerInstance.h b/flang/include/flang/Frontend/CompilerInstance.h index a6f5fa970ddb..79a05c0ddbbe 100644 --- a/flang/include/flang/Frontend/CompilerInstance.h +++ b/flang/include/flang/Frontend/CompilerInstance.h @@ -30,8 +30,6 @@ class CompilerInstance { std::shared_ptr parsing_; - std::unique_ptr semanticsContext_; - /// The stream for diagnostics from Semantics llvm::raw_ostream *semaOutputStream_ = &llvm::errs(); @@ -102,9 +100,6 @@ public: /// } /// @name Semantic analysis /// { - Fortran::semantics::SemanticsContext &semanticsContext() const { - return *semanticsContext_; - } /// Replace the current stream for verbose output. void set_semaOutputStream(llvm::raw_ostream &Value); diff --git a/flang/include/flang/Frontend/CompilerInvocation.h b/flang/include/flang/Frontend/CompilerInvocation.h index bc149a3044d8..e1409f316af8 100644 --- a/flang/include/flang/Frontend/CompilerInvocation.h +++ b/flang/include/flang/Frontend/CompilerInvocation.h @@ -61,6 +61,9 @@ class CompilerInvocation : public CompilerInvocationBase { // of options. Fortran::parser::Options parserOpts_; + // Semantics context + std::unique_ptr semanticsContext_; + /// Semantic options // TODO: Merge with or translate to frontendOpts_. We shouldn't need two sets // of options. @@ -75,6 +78,13 @@ public: Fortran::parser::Options &fortranOpts() { return parserOpts_; } const Fortran::parser::Options &fortranOpts() const { return parserOpts_; } + Fortran::semantics::SemanticsContext &semanticsContext() { + return *semanticsContext_; + } + const Fortran::semantics::SemanticsContext &semanticsContext() const { + return *semanticsContext_; + } + std::string &moduleDir() { return moduleDir_; } const std::string &moduleDir() const { return moduleDir_; } @@ -93,12 +103,15 @@ public: // compiler driver options in libclangDriver. void SetDefaultFortranOpts(); + /// Set the default predefinitions. + void setDefaultPredefinitions(); + /// Set the Fortran options to user-specified values. /// These values are found in the preprocessor options. void setFortranOpts(); /// Set the Semantic Options - void setSemanticsOpts(Fortran::semantics::SemanticsContext &); + void setSemanticsOpts(Fortran::parser::AllCookedSources &); }; } // end namespace Fortran::frontend diff --git a/flang/include/flang/Frontend/FrontendOptions.h b/flang/include/flang/Frontend/FrontendOptions.h index 1afda10cc6b4..1fc3a55091e1 100644 --- a/flang/include/flang/Frontend/FrontendOptions.h +++ b/flang/include/flang/Frontend/FrontendOptions.h @@ -8,6 +8,7 @@ #ifndef LLVM_FLANG_FRONTEND_FRONTENDOPTIONS_H #define LLVM_FLANG_FRONTEND_FRONTENDOPTIONS_H +#include "flang/Common/Fortran-features.h" #include "llvm/ADT/StringRef.h" #include "llvm/Support/MemoryBuffer.h" @@ -178,6 +179,9 @@ public: // source file. int fixedFormColumns_ = 72; + // Language features + common::LanguageFeatureControl features_; + public: FrontendOptions() : showHelp_(false), showVersion_(false) {} diff --git a/flang/lib/Frontend/CompilerInstance.cpp b/flang/lib/Frontend/CompilerInstance.cpp index 2a44425c220e..27113ea1aa1e 100644 --- a/flang/lib/Frontend/CompilerInstance.cpp +++ b/flang/lib/Frontend/CompilerInstance.cpp @@ -7,6 +7,7 @@ //===----------------------------------------------------------------------===// #include "flang/Frontend/CompilerInstance.h" +#include "flang/Common/Fortran-features.h" #include "flang/Frontend/CompilerInvocation.h" #include "flang/Frontend/TextDiagnosticPrinter.h" #include "flang/Parser/parsing.h" @@ -24,10 +25,7 @@ CompilerInstance::CompilerInstance() : invocation_(new CompilerInvocation()), allSources_(new Fortran::parser::AllSources()), allCookedSources_(new Fortran::parser::AllCookedSources(*allSources_)), - parsing_(new Fortran::parser::Parsing(*allCookedSources_)), - semanticsContext_(new Fortran::semantics::SemanticsContext( - *(new Fortran::common::IntrinsicTypeDefaultKinds()), - *(new common::LanguageFeatureControl()), *allCookedSources_)) { + parsing_(new Fortran::parser::Parsing(*allCookedSources_)) { // TODO: This is a good default during development, but ultimately we should // give the user the opportunity to specify this. allSources_->set_encoding(Fortran::parser::Encoding::UTF_8); @@ -144,10 +142,11 @@ bool CompilerInstance::ExecuteAction(FrontendAction &act) { // Set some sane defaults for the frontend. invoc.SetDefaultFortranOpts(); + invoc.setDefaultPredefinitions(); // Update the fortran options based on user-based input. invoc.setFortranOpts(); - // Set semantic options - invoc.setSemanticsOpts(this->semanticsContext()); + // Create the semantics context and set semantic options. + invoc.setSemanticsOpts(*this->allCookedSources_); // Run the frontend action `act` for every input file. for (const FrontendInputFile &fif : frontendOpts().inputs_) { diff --git a/flang/lib/Frontend/CompilerInvocation.cpp b/flang/lib/Frontend/CompilerInvocation.cpp index 445feaac1b30..078cb9513dfa 100644 --- a/flang/lib/Frontend/CompilerInvocation.cpp +++ b/flang/lib/Frontend/CompilerInvocation.cpp @@ -7,7 +7,9 @@ //===----------------------------------------------------------------------===// #include "flang/Frontend/CompilerInvocation.h" +#include "flang/Common/Fortran-features.h" #include "flang/Frontend/PreprocessorOptions.h" +#include "flang/Semantics/semantics.h" #include "flang/Version.inc" #include "clang/Basic/AllDiagnostics.h" #include "clang/Basic/DiagnosticDriver.h" @@ -21,6 +23,7 @@ #include "llvm/Option/OptTable.h" #include "llvm/Support/Process.h" #include "llvm/Support/raw_ostream.h" +#include using namespace Fortran::frontend; @@ -196,6 +199,14 @@ static InputKind ParseFrontendArgs(FrontendOptions &opts, opts.fixedFormColumns_ = columns; } } + + // Extensions + if (args.hasArg(clang::driver::options::OPT_fopenacc)) { + opts.features_.Enable(Fortran::common::LanguageFeature::OpenACC); + } + if (args.hasArg(clang::driver::options::OPT_fopenmp)) { + opts.features_.Enable(Fortran::common::LanguageFeature::OpenMP); + } return dashX; } @@ -322,6 +333,7 @@ void CompilerInvocation::SetDefaultFortranOpts() { // TODO: When expanding this list of standard predefinitions, consider // creating a dedicated API for this. Also at some point we will need to // differentiate between different targets. + // TODO: Move to setDefaultPredefinitions fortranOptions.predefinitions.emplace_back("__flang__", "1"); fortranOptions.predefinitions.emplace_back( "__flang_major__", FLANG_VERSION_MAJOR_STRING); @@ -331,6 +343,21 @@ void CompilerInvocation::SetDefaultFortranOpts() { "__flang_patchlevel__", FLANG_VERSION_PATCHLEVEL_STRING); } +void CompilerInvocation::setDefaultPredefinitions() { + auto &fortranOptions = fortranOpts(); + const auto &frontendOptions = frontendOpts(); + + // Add predefinitions based on extensions enabled + if (frontendOptions.features_.IsEnabled( + Fortran::common::LanguageFeature::OpenACC)) { + fortranOptions.predefinitions.emplace_back("_OPENACC", "202011"); + } + if (frontendOptions.features_.IsEnabled( + Fortran::common::LanguageFeature::OpenMP)) { + fortranOptions.predefinitions.emplace_back("_OPENMP", "201511"); + } +} + void CompilerInvocation::setFortranOpts() { auto &fortranOptions = fortranOpts(); const auto &frontendOptions = frontendOpts(); @@ -343,6 +370,8 @@ void CompilerInvocation::setFortranOpts() { } fortranOptions.fixedFormColumns = frontendOptions.fixedFormColumns_; + fortranOptions.features = frontendOptions.features_; + collectMacroDefinitions(preprocessorOptions, fortranOptions); fortranOptions.searchDirectories.insert( @@ -357,10 +386,14 @@ void CompilerInvocation::setFortranOpts() { } void CompilerInvocation::setSemanticsOpts( - Fortran::semantics::SemanticsContext &semaCtxt) { - auto &fortranOptions = fortranOpts(); + Fortran::parser::AllCookedSources &allCookedSources) { + const auto &fortranOptions = fortranOpts(); + + semanticsContext_ = std::make_unique( + *(new Fortran::common::IntrinsicTypeDefaultKinds()), + fortranOptions.features, allCookedSources); + auto &moduleDirJ = moduleDir(); - semaCtxt.set_moduleDirectory(moduleDirJ) + semanticsContext_->set_moduleDirectory(moduleDirJ) .set_searchDirectories(fortranOptions.searchDirectories); - return; } diff --git a/flang/lib/Frontend/FrontendActions.cpp b/flang/lib/Frontend/FrontendActions.cpp index 24c4ba577156..1a26e19bfe98 100644 --- a/flang/lib/Frontend/FrontendActions.cpp +++ b/flang/lib/Frontend/FrontendActions.cpp @@ -133,8 +133,8 @@ void ParseSyntaxOnlyAction::ExecuteAction() { auto &parseTree{*ci.parsing().parseTree()}; // Prepare semantics - Fortran::semantics::Semantics semantics{ - ci.semanticsContext(), parseTree, ci.parsing().cooked().AsCharBlock()}; + Fortran::semantics::Semantics semantics{ci.invocation().semanticsContext(), + parseTree, ci.parsing().cooked().AsCharBlock()}; // Run semantic checks semantics.Perform(); diff --git a/flang/test/Flang-Driver/driver-help-hidden.f90 b/flang/test/Flang-Driver/driver-help-hidden.f90 index 81d63b09af36..4229e4d30ddd 100644 --- a/flang/test/Flang-Driver/driver-help-hidden.f90 +++ b/flang/test/Flang-Driver/driver-help-hidden.f90 @@ -28,6 +28,8 @@ ! CHECK-NEXT: Use as character line width in fixed mode ! CHECK-NEXT: -ffree-form Process source files in free form ! CHECK-NEXT: -fno-color-diagnostics Disable colors in diagnostics +! CHECK-NEXT: -fopenacc Enable OpenACC +! CHECK-NEXT: -fopenmp Parse OpenMP pragmas and generate parallel code. ! CHECK-NEXT: -help Display available options ! CHECK-NEXT: -I Add directory to the end of the list of include search paths ! CHECK-NEXT: -module-dir Put MODULE files in diff --git a/flang/test/Flang-Driver/driver-help.f90 b/flang/test/Flang-Driver/driver-help.f90 index 4675dfa8a38a..55a989f2faab 100644 --- a/flang/test/Flang-Driver/driver-help.f90 +++ b/flang/test/Flang-Driver/driver-help.f90 @@ -28,6 +28,8 @@ ! HELP-NEXT: Use as character line width in fixed mode ! HELP-NEXT: -ffree-form Process source files in free form ! HELP-NEXT: -fno-color-diagnostics Disable colors in diagnostics +! HELP-NEXT: -fopenacc Enable OpenACC +! HELP-NEXT: -fopenmp Parse OpenMP pragmas and generate parallel code. ! HELP-NEXT: -help Display available options ! HELP-NEXT: -I Add directory to the end of the list of include search paths ! HELP-NEXT: -module-dir Put MODULE files in @@ -48,6 +50,8 @@ ! HELP-FC1-NEXT: -ffixed-line-length= ! HELP-FC1-NEXT: Use as character line width in fixed mode ! HELP-FC1-NEXT: -ffree-form Process source files in free form +! HELP-FC1-NEXT: -fopenacc Enable OpenACC +! HELP-FC1-NEXT: -fopenmp Parse OpenMP pragmas and generate parallel code. ! HELP-FC1-NEXT: -help Display available options ! HELP-FC1-NEXT: -I Add directory to the end of the list of include search paths ! HELP-FC1-NEXT: -module-dir Put MODULE files in diff --git a/flang/test/Semantics/OpenACC/acc-atomic-validity.f90 b/flang/test/Semantics/OpenACC/acc-atomic-validity.f90 index 44fdb7ad0221..6bf6bda73d1d 100644 --- a/flang/test/Semantics/OpenACC/acc-atomic-validity.f90 +++ b/flang/test/Semantics/OpenACC/acc-atomic-validity.f90 @@ -1,4 +1,4 @@ -! RUN: %S/../test_errors.sh %s %t %f18 -fopenacc +! RUN: %S/../test_errors.sh %s %t %flang -fopenacc ! Check OpenACC clause validity for the following construct and directive: ! 2.12 Atomic diff --git a/flang/test/Semantics/OpenACC/acc-branch.f90 b/flang/test/Semantics/OpenACC/acc-branch.f90 index aa4cd07d6723..d23d43829a11 100644 --- a/flang/test/Semantics/OpenACC/acc-branch.f90 +++ b/flang/test/Semantics/OpenACC/acc-branch.f90 @@ -1,4 +1,4 @@ -! RUN: %S/../test_errors.sh %s %t %f18 -fopenacc +! RUN: %S/../test_errors.sh %s %t %flang -fopenacc ! Check OpenACC restruction in branch in and out of some construct ! diff --git a/flang/test/Semantics/OpenACC/acc-cache-validity.f90 b/flang/test/Semantics/OpenACC/acc-cache-validity.f90 index 9ca6503a06b6..b975ced0505b 100644 --- a/flang/test/Semantics/OpenACC/acc-cache-validity.f90 +++ b/flang/test/Semantics/OpenACC/acc-cache-validity.f90 @@ -1,4 +1,4 @@ -! RUN: %S/../test_errors.sh %s %t %f18 -fopenacc +! RUN: %S/../test_errors.sh %s %t %flang -fopenacc ! Check OpenACC clause validity for the following construct and directive: ! 2.10 Cache diff --git a/flang/test/Semantics/OpenACC/acc-canonicalization-validity.f90 b/flang/test/Semantics/OpenACC/acc-canonicalization-validity.f90 index 33c33e57c3a4..d2d84f55a180 100644 --- a/flang/test/Semantics/OpenACC/acc-canonicalization-validity.f90 +++ b/flang/test/Semantics/OpenACC/acc-canonicalization-validity.f90 @@ -1,4 +1,4 @@ -! RUN: %S/../test_errors.sh %s %t %f18 -fopenacc +! RUN: %S/../test_errors.sh %s %t %flang -fopenacc ! Check OpenACC canonalization validity for the construct defined below: ! 2.9 Loop diff --git a/flang/test/Semantics/OpenACC/acc-data.f90 b/flang/test/Semantics/OpenACC/acc-data.f90 index e9953e6169d7..b5b24416eaf7 100644 --- a/flang/test/Semantics/OpenACC/acc-data.f90 +++ b/flang/test/Semantics/OpenACC/acc-data.f90 @@ -1,4 +1,4 @@ -! RUN: %S/../test_errors.sh %s %t %f18 -fopenacc +! RUN: %S/../test_errors.sh %s %t %flang -fopenacc ! Check OpenACC clause validity for the following construct and directive: ! 2.6.5 Data diff --git a/flang/test/Semantics/OpenACC/acc-declare-validity.f90 b/flang/test/Semantics/OpenACC/acc-declare-validity.f90 index 20658dd4b6a8..93f460cb728f 100644 --- a/flang/test/Semantics/OpenACC/acc-declare-validity.f90 +++ b/flang/test/Semantics/OpenACC/acc-declare-validity.f90 @@ -1,4 +1,4 @@ -! RUN: %S/../test_errors.sh %s %t %f18 -fopenacc +! RUN: %S/../test_errors.sh %s %t %flang -fopenacc ! Check OpenACC clause validity for the following construct and directive: ! 2.13 Declare diff --git a/flang/test/Semantics/OpenACC/acc-host-data.f90 b/flang/test/Semantics/OpenACC/acc-host-data.f90 index 4fadcbba1fe3..5c1d3a8a0695 100644 --- a/flang/test/Semantics/OpenACC/acc-host-data.f90 +++ b/flang/test/Semantics/OpenACC/acc-host-data.f90 @@ -1,4 +1,4 @@ -! RUN: %S/../test_errors.sh %s %t %f18 -fopenacc +! RUN: %S/../test_errors.sh %s %t %flang -fopenacc ! Check OpenACC clause validity for the following construct and directive: ! 2.8 host_data diff --git a/flang/test/Semantics/OpenACC/acc-init-validity.f90 b/flang/test/Semantics/OpenACC/acc-init-validity.f90 index b8ba77a96fea..7f6c89e4724d 100644 --- a/flang/test/Semantics/OpenACC/acc-init-validity.f90 +++ b/flang/test/Semantics/OpenACC/acc-init-validity.f90 @@ -1,4 +1,4 @@ -! RUN: %S/../test_errors.sh %s %t %f18 -fopenacc +! RUN: %S/../test_errors.sh %s %t %flang -fopenacc ! Check OpenACC clause validity for the following construct and directive: ! 2.14.1 Init diff --git a/flang/test/Semantics/OpenACC/acc-kernels-loop.f90 b/flang/test/Semantics/OpenACC/acc-kernels-loop.f90 index 4ce039b48433..47f07a360d75 100644 --- a/flang/test/Semantics/OpenACC/acc-kernels-loop.f90 +++ b/flang/test/Semantics/OpenACC/acc-kernels-loop.f90 @@ -1,4 +1,4 @@ -! RUN: %S/../test_errors.sh %s %t %f18 -fopenacc +! RUN: %S/../test_errors.sh %s %t %flang -fopenacc ! Check OpenACC clause validity for the following construct and directive: ! 2.11 Kernels Loop diff --git a/flang/test/Semantics/OpenACC/acc-kernels.f90 b/flang/test/Semantics/OpenACC/acc-kernels.f90 index d769d51de59b..815c46af5aca 100644 --- a/flang/test/Semantics/OpenACC/acc-kernels.f90 +++ b/flang/test/Semantics/OpenACC/acc-kernels.f90 @@ -1,4 +1,4 @@ -! RUN: %S/../test_errors.sh %s %t %f18 -fopenacc +! RUN: %S/../test_errors.sh %s %t %flang -fopenacc ! Check OpenACC clause validity for the following construct and directive: ! 2.5.3 Kernels diff --git a/flang/test/Semantics/OpenACC/acc-loop.f90 b/flang/test/Semantics/OpenACC/acc-loop.f90 index 1a8336b39053..75e292ac6ca5 100644 --- a/flang/test/Semantics/OpenACC/acc-loop.f90 +++ b/flang/test/Semantics/OpenACC/acc-loop.f90 @@ -1,4 +1,4 @@ -! RUN: %S/../test_errors.sh %s %t %f18 -fopenacc +! RUN: %S/../test_errors.sh %s %t %flang -fopenacc ! Check OpenACC clause validity for the following construct and directive: ! 2.9 Loop diff --git a/flang/test/Semantics/OpenACC/acc-parallel-loop-validity.f90 b/flang/test/Semantics/OpenACC/acc-parallel-loop-validity.f90 index debfbb51bdfd..ee2f2fa81136 100644 --- a/flang/test/Semantics/OpenACC/acc-parallel-loop-validity.f90 +++ b/flang/test/Semantics/OpenACC/acc-parallel-loop-validity.f90 @@ -1,4 +1,4 @@ -! RUN: %S/../test_errors.sh %s %t %f18 -fopenacc +! RUN: %S/../test_errors.sh %s %t %flang -fopenacc ! Check OpenACC clause validity for the following construct and directive: ! 2.11 Parallel Loop diff --git a/flang/test/Semantics/OpenACC/acc-parallel.f90 b/flang/test/Semantics/OpenACC/acc-parallel.f90 index 37fd0bfd36cd..7f14f607b117 100644 --- a/flang/test/Semantics/OpenACC/acc-parallel.f90 +++ b/flang/test/Semantics/OpenACC/acc-parallel.f90 @@ -1,4 +1,4 @@ -! RUN: %S/../test_errors.sh %s %t %f18 -fopenacc +! RUN: %S/../test_errors.sh %s %t %flang -fopenacc ! Check OpenACC clause validity for the following construct and directive: ! 2.5.1 Parallel diff --git a/flang/test/Semantics/OpenACC/acc-resolve01.f90 b/flang/test/Semantics/OpenACC/acc-resolve01.f90 index 26d97702a61b..5fc153fd8848 100644 --- a/flang/test/Semantics/OpenACC/acc-resolve01.f90 +++ b/flang/test/Semantics/OpenACC/acc-resolve01.f90 @@ -1,4 +1,4 @@ -! RUN: %S/../test_errors.sh %s %t %f18 -fopenacc +! RUN: %S/../test_errors.sh %s %t %flang -fopenacc ! Data-Mapping Attribute Clauses ! 2.15.14 default Clause diff --git a/flang/test/Semantics/OpenACC/acc-resolve02.f90 b/flang/test/Semantics/OpenACC/acc-resolve02.f90 index a793c94c0999..7a9aff33c57f 100644 --- a/flang/test/Semantics/OpenACC/acc-resolve02.f90 +++ b/flang/test/Semantics/OpenACC/acc-resolve02.f90 @@ -1,4 +1,4 @@ -! RUN: %S/../test_errors.sh %s %t %f18 -fopenacc +! RUN: %S/../test_errors.sh %s %t %flang -fopenacc subroutine compute() integer :: a(3), c, i diff --git a/flang/test/Semantics/OpenACC/acc-routine-validity.f90 b/flang/test/Semantics/OpenACC/acc-routine-validity.f90 index e31032fa5768..c6bde7d4fc48 100644 --- a/flang/test/Semantics/OpenACC/acc-routine-validity.f90 +++ b/flang/test/Semantics/OpenACC/acc-routine-validity.f90 @@ -1,4 +1,4 @@ -! RUN: %S/../test_errors.sh %s %t %f18 -fopenacc +! RUN: %S/../test_errors.sh %s %t %flang -fopenacc ! Check OpenACC clause validity for the following construct and directive: ! 2.15.1 routine diff --git a/flang/test/Semantics/OpenACC/acc-serial-loop.f90 b/flang/test/Semantics/OpenACC/acc-serial-loop.f90 index 0c48703a3ea5..499c9411ad84 100644 --- a/flang/test/Semantics/OpenACC/acc-serial-loop.f90 +++ b/flang/test/Semantics/OpenACC/acc-serial-loop.f90 @@ -1,4 +1,4 @@ -! RUN: %S/../test_errors.sh %s %t %f18 -fopenacc +! RUN: %S/../test_errors.sh %s %t %flang -fopenacc ! Check OpenACC clause validity for the following construct and directive: ! 2.11 Serial Loop diff --git a/flang/test/Semantics/OpenACC/acc-serial.f90 b/flang/test/Semantics/OpenACC/acc-serial.f90 index 127f88853397..59f6e8b049f0 100644 --- a/flang/test/Semantics/OpenACC/acc-serial.f90 +++ b/flang/test/Semantics/OpenACC/acc-serial.f90 @@ -1,4 +1,4 @@ -! RUN: %S/../test_errors.sh %s %t %f18 -fopenacc +! RUN: %S/../test_errors.sh %s %t %flang -fopenacc ! Check OpenACC clause validity for the following construct and directive: ! 2.5.2 Serial diff --git a/flang/test/Semantics/OpenACC/acc-set-validity.f90 b/flang/test/Semantics/OpenACC/acc-set-validity.f90 index 63df3c62cd0d..cd1981fdb79e 100644 --- a/flang/test/Semantics/OpenACC/acc-set-validity.f90 +++ b/flang/test/Semantics/OpenACC/acc-set-validity.f90 @@ -1,4 +1,4 @@ -! RUN: %S/../test_errors.sh %s %t %f18 -fopenacc +! RUN: %S/../test_errors.sh %s %t %flang -fopenacc ! Check OpenACC clause validity for the following construct and directive: ! 2.14.3 Set diff --git a/flang/test/Semantics/OpenACC/acc-shutdown-validity.f90 b/flang/test/Semantics/OpenACC/acc-shutdown-validity.f90 index d78af4585601..5e8d2851967c 100644 --- a/flang/test/Semantics/OpenACC/acc-shutdown-validity.f90 +++ b/flang/test/Semantics/OpenACC/acc-shutdown-validity.f90 @@ -1,4 +1,4 @@ -! RUN: %S/../test_errors.sh %s %t %f18 -fopenacc +! RUN: %S/../test_errors.sh %s %t %flang -fopenacc ! Check OpenACC clause validity for the following construct and directive: ! 2.14.2 Shutdown diff --git a/flang/test/Semantics/OpenACC/acc-update-validity.f90 b/flang/test/Semantics/OpenACC/acc-update-validity.f90 index 501b8df989e6..9dd5d0a99709 100644 --- a/flang/test/Semantics/OpenACC/acc-update-validity.f90 +++ b/flang/test/Semantics/OpenACC/acc-update-validity.f90 @@ -1,4 +1,4 @@ -! RUN: %S/../test_errors.sh %s %t %f18 -fopenacc +! RUN: %S/../test_errors.sh %s %t %flang -fopenacc ! Check OpenACC clause validity for the following construct and directive: ! 2.14.4 Update diff --git a/flang/test/Semantics/OpenACC/acc-wait-validity.f90 b/flang/test/Semantics/OpenACC/acc-wait-validity.f90 index 6be59c7b9c08..ca7ac1add033 100644 --- a/flang/test/Semantics/OpenACC/acc-wait-validity.f90 +++ b/flang/test/Semantics/OpenACC/acc-wait-validity.f90 @@ -1,4 +1,4 @@ -! RUN: %S/../test_errors.sh %s %t %f18 -fopenacc +! RUN: %S/../test_errors.sh %s %t %flang -fopenacc ! Check OpenACC clause validity for the following construct and directive: ! 2.16.13 Wait diff --git a/flang/test/Semantics/omp-atomic.f90 b/flang/test/Semantics/omp-atomic.f90 index dae0164e3bfa..aa50f808dba5 100644 --- a/flang/test/Semantics/omp-atomic.f90 +++ b/flang/test/Semantics/omp-atomic.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp use omp_lib ! Check OpenMP 2.13.6 atomic Construct diff --git a/flang/test/Semantics/omp-combined-constructs.f90 b/flang/test/Semantics/omp-combined-constructs.f90 index afb70b7eda66..fb30b50f3b54 100644 --- a/flang/test/Semantics/omp-combined-constructs.f90 +++ b/flang/test/Semantics/omp-combined-constructs.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp program main implicit none diff --git a/flang/test/Semantics/omp-copyin01.f90 b/flang/test/Semantics/omp-copyin01.f90 index 5cae90a8624c..4f665cbafc79 100644 --- a/flang/test/Semantics/omp-copyin01.f90 +++ b/flang/test/Semantics/omp-copyin01.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.15.4.1 copyin Clause ! A list item that appears in a copyin clause must be threadprivate diff --git a/flang/test/Semantics/omp-copyin02.f90 b/flang/test/Semantics/omp-copyin02.f90 index 80ce47f79b46..289ed14a1c38 100644 --- a/flang/test/Semantics/omp-copyin02.f90 +++ b/flang/test/Semantics/omp-copyin02.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.15.4.1 copyin Clause ! A common block name that appears in a copyin clause must be declared to be diff --git a/flang/test/Semantics/omp-copyin03.f90 b/flang/test/Semantics/omp-copyin03.f90 index 64b26c52ea0a..be8638a70f8c 100644 --- a/flang/test/Semantics/omp-copyin03.f90 +++ b/flang/test/Semantics/omp-copyin03.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.15.4.1 copyin Clause ! A list item that appears in a copyin clause must be threadprivate. diff --git a/flang/test/Semantics/omp-copyin04.f90 b/flang/test/Semantics/omp-copyin04.f90 index 7c8017300fc4..4432cf288722 100644 --- a/flang/test/Semantics/omp-copyin04.f90 +++ b/flang/test/Semantics/omp-copyin04.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.15.4.1 copyin Clause ! A list item that appears in a copyin clause must be threadprivate diff --git a/flang/test/Semantics/omp-copyin05.f90 b/flang/test/Semantics/omp-copyin05.f90 index 37269fe4eae8..72e346f8a7f5 100644 --- a/flang/test/Semantics/omp-copyin05.f90 +++ b/flang/test/Semantics/omp-copyin05.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.15.4.1 copyin Clause ! A common block name that appears in a copyin clause must be declared to be diff --git a/flang/test/Semantics/omp-declarative-directive.f90 b/flang/test/Semantics/omp-declarative-directive.f90 index dd5e7fd564e8..5ad56a590c2f 100644 --- a/flang/test/Semantics/omp-declarative-directive.f90 +++ b/flang/test/Semantics/omp-declarative-directive.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! Check OpenMP declarative directives diff --git a/flang/test/Semantics/omp-default.f90 b/flang/test/Semantics/omp-default.f90 index c5770f887f3a..4189ca603693 100644 --- a/flang/test/Semantics/omp-default.f90 +++ b/flang/test/Semantics/omp-default.f90 @@ -1,4 +1,4 @@ -!RUN: %S/test_errors.sh %s %t %f18 -fopenmp +!RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.15.3.1 default Clause program omp_default diff --git a/flang/test/Semantics/omp-default02.f90 b/flang/test/Semantics/omp-default02.f90 index be72098c35c2..001551e435eb 100644 --- a/flang/test/Semantics/omp-default02.f90 +++ b/flang/test/Semantics/omp-default02.f90 @@ -1,4 +1,4 @@ -!RUN: %S/test_errors.sh %s %t %f18 -fopenmp +!RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.15.3.1 default Clause - a positive test case. diff --git a/flang/test/Semantics/omp-depend01.f90 b/flang/test/Semantics/omp-depend01.f90 index c40b8c652c8d..f8e159239b8a 100644 --- a/flang/test/Semantics/omp-depend01.f90 +++ b/flang/test/Semantics/omp-depend01.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.13.9 Depend Clause ! List items used in depend clauses cannot be zero-length array sections. diff --git a/flang/test/Semantics/omp-depend02.f90 b/flang/test/Semantics/omp-depend02.f90 index 20c2fee69afa..9bc710410d9e 100644 --- a/flang/test/Semantics/omp-depend02.f90 +++ b/flang/test/Semantics/omp-depend02.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.13.9 Depend Clause ! A variable that is part of another variable diff --git a/flang/test/Semantics/omp-depend03.f90 b/flang/test/Semantics/omp-depend03.f90 index 32dd73899651..d4b228f7e92b 100644 --- a/flang/test/Semantics/omp-depend03.f90 +++ b/flang/test/Semantics/omp-depend03.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.13.9 Depend Clause ! Coarrays are not supported in depend clause diff --git a/flang/test/Semantics/omp-device-constructs.f90 b/flang/test/Semantics/omp-device-constructs.f90 index 1d8c83e699dc..5f6d7dde8ce5 100644 --- a/flang/test/Semantics/omp-device-constructs.f90 +++ b/flang/test/Semantics/omp-device-constructs.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! Check OpenMP clause validity for the following directives: ! 2.10 Device constructs program main diff --git a/flang/test/Semantics/omp-do-collapse-positivecases.f90 b/flang/test/Semantics/omp-do-collapse-positivecases.f90 index 231d2487f976..0c09013c6547 100644 --- a/flang/test/Semantics/omp-do-collapse-positivecases.f90 +++ b/flang/test/Semantics/omp-do-collapse-positivecases.f90 @@ -1,4 +1,4 @@ -!RUN: %S/test_errors.sh %s %t %f18 -fopenmp +!RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.7.1 Collapse Clause Positive cases diff --git a/flang/test/Semantics/omp-do-collapse.f90 b/flang/test/Semantics/omp-do-collapse.f90 index 1db1d56bfca8..aa010884c6da 100644 --- a/flang/test/Semantics/omp-do-collapse.f90 +++ b/flang/test/Semantics/omp-do-collapse.f90 @@ -1,4 +1,4 @@ -!RUN: %S/test_errors.sh %s %t %f18 -fopenmp +!RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.7.1 Collapse Clause program omp_doCollapse diff --git a/flang/test/Semantics/omp-do-cycle.f90 b/flang/test/Semantics/omp-do-cycle.f90 index a19835f74afa..0d9cf52e6f5a 100644 --- a/flang/test/Semantics/omp-do-cycle.f90 +++ b/flang/test/Semantics/omp-do-cycle.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! Check for cycle statements leaving an OpenMP structured block diff --git a/flang/test/Semantics/omp-do-ordered-positivecases.f90 b/flang/test/Semantics/omp-do-ordered-positivecases.f90 index faed7f319439..751e6954dc3e 100644 --- a/flang/test/Semantics/omp-do-ordered-positivecases.f90 +++ b/flang/test/Semantics/omp-do-ordered-positivecases.f90 @@ -1,4 +1,4 @@ -!RUN: %S/test_errors.sh %s %t %f18 -fopenmp +!RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.7.1 Ordered Clause positive cases. diff --git a/flang/test/Semantics/omp-do-ordered.f90 b/flang/test/Semantics/omp-do-ordered.f90 index 66c3bc606b31..04967cf31746 100644 --- a/flang/test/Semantics/omp-do-ordered.f90 +++ b/flang/test/Semantics/omp-do-ordered.f90 @@ -1,4 +1,4 @@ -!RUN: %S/test_errors.sh %s %t %f18 -fopenmp +!RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.7.1 Ordered Clause diff --git a/flang/test/Semantics/omp-do-schedule01.f90 b/flang/test/Semantics/omp-do-schedule01.f90 index fbce3e53447d..598877f1ea94 100644 --- a/flang/test/Semantics/omp-do-schedule01.f90 +++ b/flang/test/Semantics/omp-do-schedule01.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.7.1 Schedule Clause program omp_doSchedule diff --git a/flang/test/Semantics/omp-do-schedule02.f90 b/flang/test/Semantics/omp-do-schedule02.f90 index 993663503d74..3699d3401e87 100644 --- a/flang/test/Semantics/omp-do-schedule02.f90 +++ b/flang/test/Semantics/omp-do-schedule02.f90 @@ -1,4 +1,4 @@ -!RUN: %S/test_errors.sh %s %t %f18 -fopenmp +!RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.7.1 Schedule Clause program omp_doSchedule diff --git a/flang/test/Semantics/omp-do01.f90 b/flang/test/Semantics/omp-do01.f90 index 7e858a5a26a9..ce9d5e684f97 100644 --- a/flang/test/Semantics/omp-do01.f90 +++ b/flang/test/Semantics/omp-do01.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.7.1 Loop Construct ! The loop iteration variable may not appear in a firstprivate directive. diff --git a/flang/test/Semantics/omp-do02.f90 b/flang/test/Semantics/omp-do02.f90 index dd654d9ed021..9749991e4f96 100644 --- a/flang/test/Semantics/omp-do02.f90 +++ b/flang/test/Semantics/omp-do02.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! XFAIL: * ! OpenMP Version 4.5 diff --git a/flang/test/Semantics/omp-do03.f90 b/flang/test/Semantics/omp-do03.f90 index 0153d72881fd..f1fcc9ea1793 100644 --- a/flang/test/Semantics/omp-do03.f90 +++ b/flang/test/Semantics/omp-do03.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.7.1 Loop Construct diff --git a/flang/test/Semantics/omp-do04.f90 b/flang/test/Semantics/omp-do04.f90 index 69b3dd573762..857df1cf2744 100644 --- a/flang/test/Semantics/omp-do04.f90 +++ b/flang/test/Semantics/omp-do04.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! XFAIL: * ! OpenMP Version 4.5 diff --git a/flang/test/Semantics/omp-do05.f90 b/flang/test/Semantics/omp-do05.f90 index fcf1911a7698..07b952b6ad09 100644 --- a/flang/test/Semantics/omp-do05.f90 +++ b/flang/test/Semantics/omp-do05.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.7.1 Loop Construct restrictions on single directive. diff --git a/flang/test/Semantics/omp-do06.f90 b/flang/test/Semantics/omp-do06.f90 index c00af5cdf7ae..bcba318d2178 100644 --- a/flang/test/Semantics/omp-do06.f90 +++ b/flang/test/Semantics/omp-do06.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! XFAIL:* ! OpenMP Version 4.5 diff --git a/flang/test/Semantics/omp-do07.f90 b/flang/test/Semantics/omp-do07.f90 index 7b0609df3272..5b3eb28c17e7 100644 --- a/flang/test/Semantics/omp-do07.f90 +++ b/flang/test/Semantics/omp-do07.f90 @@ -1,4 +1,4 @@ -! RUN: not %f18 -fparse-only -fopenmp %s 2>&1 | FileCheck %s +! RUN: not %flang -fsyntax-only -fopenmp %s 2>&1 | FileCheck %s ! OpenMP Version 4.5 ! 2.7.1 Loop Construct ! No statement in the associated loops other than the DO statements diff --git a/flang/test/Semantics/omp-do08.f90 b/flang/test/Semantics/omp-do08.f90 index 9f8b551e8b06..58e77b71e288 100644 --- a/flang/test/Semantics/omp-do08.f90 +++ b/flang/test/Semantics/omp-do08.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! XFAIL: * ! OpenMP Version 4.5 diff --git a/flang/test/Semantics/omp-do09.f90 b/flang/test/Semantics/omp-do09.f90 index 1c8a6eefd334..22a9b56983e8 100644 --- a/flang/test/Semantics/omp-do09.f90 +++ b/flang/test/Semantics/omp-do09.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! XFAIL: * ! OpenMP Version 4.5 diff --git a/flang/test/Semantics/omp-do10.f90 b/flang/test/Semantics/omp-do10.f90 index c56887a20d74..cc2071d874b5 100644 --- a/flang/test/Semantics/omp-do10.f90 +++ b/flang/test/Semantics/omp-do10.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! XFAIL: * ! OpenMP Version 4.5 diff --git a/flang/test/Semantics/omp-flush01.f90 b/flang/test/Semantics/omp-flush01.f90 index cca78e7a09cd..3b1bd4eb1fef 100644 --- a/flang/test/Semantics/omp-flush01.f90 +++ b/flang/test/Semantics/omp-flush01.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! 2.17.8 Flush construct [OpenMP 5.0] ! memory-order-clause -> diff --git a/flang/test/Semantics/omp-invalid-branch.f90 b/flang/test/Semantics/omp-invalid-branch.f90 index df1eaf181631..535a89fa51f5 100644 --- a/flang/test/Semantics/omp-invalid-branch.f90 +++ b/flang/test/Semantics/omp-invalid-branch.f90 @@ -1,4 +1,4 @@ -! RUN: not %f18 -fparse-only -fopenmp %s 2>&1 | FileCheck %s +! RUN: not %flang -fsyntax-only -fopenmp %s 2>&1 | FileCheck %s ! OpenMP Version 4.5 ! Check invalid branches into or out of OpenMP structured blocks. diff --git a/flang/test/Semantics/omp-loop-association.f90 b/flang/test/Semantics/omp-loop-association.f90 index af22f62bc697..ef04073c3df2 100644 --- a/flang/test/Semantics/omp-loop-association.f90 +++ b/flang/test/Semantics/omp-loop-association.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! Check the association between OpenMPLoopConstruct and DoConstruct diff --git a/flang/test/Semantics/omp-loop-simd01.f90 b/flang/test/Semantics/omp-loop-simd01.f90 index d39bb830a3a9..202e27556c99 100644 --- a/flang/test/Semantics/omp-loop-simd01.f90 +++ b/flang/test/Semantics/omp-loop-simd01.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.8.3 Loop simd Construct diff --git a/flang/test/Semantics/omp-nested01.f90 b/flang/test/Semantics/omp-nested01.f90 index 98efa54cfaea..c84c9da1f4b8 100644 --- a/flang/test/Semantics/omp-nested01.f90 +++ b/flang/test/Semantics/omp-nested01.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! Check OpenMP 2.17 Nesting of Regions diff --git a/flang/test/Semantics/omp-no-dowhile-in-parallel.f90 b/flang/test/Semantics/omp-no-dowhile-in-parallel.f90 index f49d29c93a90..bb66c8435bcb 100644 --- a/flang/test/Semantics/omp-no-dowhile-in-parallel.f90 +++ b/flang/test/Semantics/omp-no-dowhile-in-parallel.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp subroutine bug48308(x,i) real :: x(:) diff --git a/flang/test/Semantics/omp-parallel-private01.f90 b/flang/test/Semantics/omp-parallel-private01.f90 index 029c36ffeeb5..eaa9ef6988ae 100644 --- a/flang/test/Semantics/omp-parallel-private01.f90 +++ b/flang/test/Semantics/omp-parallel-private01.f90 @@ -1,4 +1,4 @@ -!RUN: %S/test_errors.sh %s %t %f18 -fopenmp +!RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.15.3.3 parallel private Clause program omp_parallel_private diff --git a/flang/test/Semantics/omp-parallel-private02.f90 b/flang/test/Semantics/omp-parallel-private02.f90 index b452b0eb7501..5c9251df88cf 100644 --- a/flang/test/Semantics/omp-parallel-private02.f90 +++ b/flang/test/Semantics/omp-parallel-private02.f90 @@ -1,4 +1,4 @@ -!RUN: %S/test_errors.sh %s %t %f18 -fopenmp +!RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.15.3.3 parallel private Clause program omp_parallel_private diff --git a/flang/test/Semantics/omp-parallel-private03.f90 b/flang/test/Semantics/omp-parallel-private03.f90 index 18d5bc171027..6fee9ba0f66a 100644 --- a/flang/test/Semantics/omp-parallel-private03.f90 +++ b/flang/test/Semantics/omp-parallel-private03.f90 @@ -1,4 +1,4 @@ -!RUN: %S/test_errors.sh %s %t %f18 -fopenmp +!RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.15.3.3 parallel private Clause program omp_parallel_private diff --git a/flang/test/Semantics/omp-parallel-private04.f90 b/flang/test/Semantics/omp-parallel-private04.f90 index 9a8765b12635..c207ade76db7 100644 --- a/flang/test/Semantics/omp-parallel-private04.f90 +++ b/flang/test/Semantics/omp-parallel-private04.f90 @@ -1,4 +1,4 @@ -!RUN: %S/test_errors.sh %s %t %f18 -fopenmp +!RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.15.3.3 parallel private Clause program omp_parallel_private diff --git a/flang/test/Semantics/omp-parallel-shared01.f90 b/flang/test/Semantics/omp-parallel-shared01.f90 index 7dda194d0e29..b1a74742e523 100644 --- a/flang/test/Semantics/omp-parallel-shared01.f90 +++ b/flang/test/Semantics/omp-parallel-shared01.f90 @@ -1,4 +1,4 @@ -!RUN: %S/test_errors.sh %s %t %f18 -fopenmp +!RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.15.3.2 parallel shared Clause program omp_parallel_shared diff --git a/flang/test/Semantics/omp-parallel-shared02.f90 b/flang/test/Semantics/omp-parallel-shared02.f90 index 50b2ece0c058..d15d854718b4 100644 --- a/flang/test/Semantics/omp-parallel-shared02.f90 +++ b/flang/test/Semantics/omp-parallel-shared02.f90 @@ -1,4 +1,4 @@ -!RUN: %S/test_errors.sh %s %t %f18 -fopenmp +!RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.15.3.2 parallel shared Clause program omp_parallel_shared diff --git a/flang/test/Semantics/omp-parallel-shared03.f90 b/flang/test/Semantics/omp-parallel-shared03.f90 index 386023e452f9..475d6ab7c623 100644 --- a/flang/test/Semantics/omp-parallel-shared03.f90 +++ b/flang/test/Semantics/omp-parallel-shared03.f90 @@ -1,4 +1,4 @@ -!RUN: %S/test_errors.sh %s %t %f18 -fopenmp +!RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.15.3.2 parallel shared Clause program omp_parallel_shared diff --git a/flang/test/Semantics/omp-parallel-shared04.f90 b/flang/test/Semantics/omp-parallel-shared04.f90 index 3a7c3f940e2a..511b2f15ca4d 100644 --- a/flang/test/Semantics/omp-parallel-shared04.f90 +++ b/flang/test/Semantics/omp-parallel-shared04.f90 @@ -1,4 +1,4 @@ -!RUN: %S/test_errors.sh %s %t %f18 -fopenmp +!RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.15.3.2 parallel shared Clause program omp_parallel_shared diff --git a/flang/test/Semantics/omp-parallel01.f90 b/flang/test/Semantics/omp-parallel01.f90 index 6e66237e74cd..6d5dd581a9f2 100644 --- a/flang/test/Semantics/omp-parallel01.f90 +++ b/flang/test/Semantics/omp-parallel01.f90 @@ -1,4 +1,4 @@ -! RUN: not %f18 -fparse-only -fopenmp %s 2>&1 | FileCheck %s +! RUN: not %flang -fsyntax-only -fopenmp %s 2>&1 | FileCheck %s ! OpenMP Version 4.5 ! 2.5 parallel construct. ! A program that branches into or out of a parallel region diff --git a/flang/test/Semantics/omp-parallel02.f90 b/flang/test/Semantics/omp-parallel02.f90 index 06b05e26a85a..59032e17c6ae 100644 --- a/flang/test/Semantics/omp-parallel02.f90 +++ b/flang/test/Semantics/omp-parallel02.f90 @@ -1,4 +1,4 @@ -! RUN: not %f18 -fparse-only -fopenmp %s 2>&1 | FileCheck %s +! RUN: not %flang -fsyntax-only -fopenmp %s 2>&1 | FileCheck %s ! OpenMP Version 4.5 ! 2.5 parallel construct. ! A program that branches into or out of a parallel region diff --git a/flang/test/Semantics/omp-private01.f90 b/flang/test/Semantics/omp-private01.f90 index 49c1f0d2c029..64c7c5bcac0d 100644 --- a/flang/test/Semantics/omp-private01.f90 +++ b/flang/test/Semantics/omp-private01.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.15.3.3 private Clause ! Pointers with the INTENT(IN) attribute may not appear in a private clause. diff --git a/flang/test/Semantics/omp-private02.f90 b/flang/test/Semantics/omp-private02.f90 index 14978694ff03..0ff49c32c0ed 100644 --- a/flang/test/Semantics/omp-private02.f90 +++ b/flang/test/Semantics/omp-private02.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.15.3.3 private Clause ! Variables that appear in namelist statements may not appear in a private clause. diff --git a/flang/test/Semantics/omp-private03.f90 b/flang/test/Semantics/omp-private03.f90 index 50748f5508ed..61b35ec344f3 100644 --- a/flang/test/Semantics/omp-private03.f90 +++ b/flang/test/Semantics/omp-private03.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! Variables that appear in expressions for statement function definitions ! may not appear in private, firstprivate or lastprivate clauses. diff --git a/flang/test/Semantics/omp-resolve01.f90 b/flang/test/Semantics/omp-resolve01.f90 index 09f7b7666ce6..04a0f1b04dfc 100644 --- a/flang/test/Semantics/omp-resolve01.f90 +++ b/flang/test/Semantics/omp-resolve01.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! 2.4 An array section designates a subset of the elements in an array. Although ! Substring shares similar syntax but cannot be treated as valid array section. diff --git a/flang/test/Semantics/omp-resolve02.f90 b/flang/test/Semantics/omp-resolve02.f90 index 7942aac9ed62..b5cd5b4c9431 100644 --- a/flang/test/Semantics/omp-resolve02.f90 +++ b/flang/test/Semantics/omp-resolve02.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! Test the effect to name resolution from illegal clause diff --git a/flang/test/Semantics/omp-resolve03.f90 b/flang/test/Semantics/omp-resolve03.f90 index 8e762bb3e425..71648a2025b4 100644 --- a/flang/test/Semantics/omp-resolve03.f90 +++ b/flang/test/Semantics/omp-resolve03.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! 2.15.3 Although variables in common blocks can be accessed by use association ! or host association, common block names cannot. As a result, a common block diff --git a/flang/test/Semantics/omp-resolve04.f90 b/flang/test/Semantics/omp-resolve04.f90 index fef6034aaa09..1e1c35b9ee03 100644 --- a/flang/test/Semantics/omp-resolve04.f90 +++ b/flang/test/Semantics/omp-resolve04.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! 2.15.3 Data-Sharing Attribute Clauses ! A list item that specifies a given variable may not appear in more than diff --git a/flang/test/Semantics/omp-resolve05.f90 b/flang/test/Semantics/omp-resolve05.f90 index 5aaa722e8f88..f1e7903d2d63 100644 --- a/flang/test/Semantics/omp-resolve05.f90 +++ b/flang/test/Semantics/omp-resolve05.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! 2.15.3 Data-Sharing Attribute Clauses ! 2.15.3.1 default Clause diff --git a/flang/test/Semantics/omp-sections01.f90 b/flang/test/Semantics/omp-sections01.f90 index aa96ca0ebdc7..e2db71aecf5f 100644 --- a/flang/test/Semantics/omp-sections01.f90 +++ b/flang/test/Semantics/omp-sections01.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.7.2 sections Construct diff --git a/flang/test/Semantics/omp-simd01.f90 b/flang/test/Semantics/omp-simd01.f90 index da177be32103..fb86fbaf5675 100644 --- a/flang/test/Semantics/omp-simd01.f90 +++ b/flang/test/Semantics/omp-simd01.f90 @@ -1,4 +1,4 @@ -! RUN: not %f18 -fparse-only -fopenmp %s 2>&1 | FileCheck %s +! RUN: not %flang -fsyntax-only -fopenmp %s 2>&1 | FileCheck %s ! OpenMP Version 4.5 ! 2.8.1 simd Construct ! A program that branches into or out of a simd region is non-conforming. diff --git a/flang/test/Semantics/omp-simd02.f90 b/flang/test/Semantics/omp-simd02.f90 index b3c497b94f17..09f1c36af341 100644 --- a/flang/test/Semantics/omp-simd02.f90 +++ b/flang/test/Semantics/omp-simd02.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.8.1 simd Construct diff --git a/flang/test/Semantics/omp-simd03.f90 b/flang/test/Semantics/omp-simd03.f90 index 1bde68d97409..38f45da47748 100644 --- a/flang/test/Semantics/omp-simd03.f90 +++ b/flang/test/Semantics/omp-simd03.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! XFAIL: * ! OpenMP Version 4.5 diff --git a/flang/test/Semantics/omp-single01.f90 b/flang/test/Semantics/omp-single01.f90 index 527a6d005d2f..def83462c1e7 100644 --- a/flang/test/Semantics/omp-single01.f90 +++ b/flang/test/Semantics/omp-single01.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! XFAIL: * ! OpenMP Version 4.5 diff --git a/flang/test/Semantics/omp-single02.f90 b/flang/test/Semantics/omp-single02.f90 index 0f68f26d2c27..856c99338f7b 100644 --- a/flang/test/Semantics/omp-single02.f90 +++ b/flang/test/Semantics/omp-single02.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! XFAIL: * ! OpenMP Version 4.5 diff --git a/flang/test/Semantics/omp-task01.f90 b/flang/test/Semantics/omp-task01.f90 index 7824ae22226b..1206a889e837 100644 --- a/flang/test/Semantics/omp-task01.f90 +++ b/flang/test/Semantics/omp-task01.f90 @@ -1,4 +1,4 @@ -! RUN: not %f18 -fparse-only -fopenmp %s 2>&1 | FileCheck %s +! RUN: not %flang -fsyntax-only -fopenmp %s 2>&1 | FileCheck %s ! OpenMP Version 4.5 ! 2.9.1 task Construct ! Invalid entry to OpenMP structured block. diff --git a/flang/test/Semantics/omp-taskloop-simd01.f90 b/flang/test/Semantics/omp-taskloop-simd01.f90 index 8d02c32ab3ad..d7b2960d5882 100644 --- a/flang/test/Semantics/omp-taskloop-simd01.f90 +++ b/flang/test/Semantics/omp-taskloop-simd01.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! XFAIL: * ! OpenMP Version 4.5 diff --git a/flang/test/Semantics/omp-taskloop01.f90 b/flang/test/Semantics/omp-taskloop01.f90 index 516b856c0c52..c3870047b8ed 100644 --- a/flang/test/Semantics/omp-taskloop01.f90 +++ b/flang/test/Semantics/omp-taskloop01.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.9.2 taskloop Construct diff --git a/flang/test/Semantics/omp-taskloop02.f90 b/flang/test/Semantics/omp-taskloop02.f90 index 56a3e4e060fe..867ef8a9806d 100644 --- a/flang/test/Semantics/omp-taskloop02.f90 +++ b/flang/test/Semantics/omp-taskloop02.f90 @@ -1,4 +1,4 @@ -! RUN: not %f18 -fparse-only -fopenmp %s 2>&1 | FileCheck %s +! RUN: not %flang -fsyntax-only -fopenmp %s 2>&1 | FileCheck %s ! OpenMP Version 4.5 ! 2.9.2 taskloop Construct ! Invalid entry to OpenMP structured block. diff --git a/flang/test/Semantics/omp-taskloop03.f90 b/flang/test/Semantics/omp-taskloop03.f90 index 7b8f7ca54dd5..7e2e426a3fe7 100644 --- a/flang/test/Semantics/omp-taskloop03.f90 +++ b/flang/test/Semantics/omp-taskloop03.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! XFAIL: * ! OpenMP Version 4.5 diff --git a/flang/test/Semantics/omp-workshare01.f90 b/flang/test/Semantics/omp-workshare01.f90 index 7396555ceeaf..1a1f19421aa4 100644 --- a/flang/test/Semantics/omp-workshare01.f90 +++ b/flang/test/Semantics/omp-workshare01.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.7.4 workshare Construct ! Invalid do construct inside !$omp workshare diff --git a/flang/test/Semantics/omp-workshare02.f90 b/flang/test/Semantics/omp-workshare02.f90 index 4f09269d536e..14402e1faff6 100644 --- a/flang/test/Semantics/omp-workshare02.f90 +++ b/flang/test/Semantics/omp-workshare02.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.7.4 workshare Construct ! The !omp workshare construct must not contain any user defined diff --git a/flang/test/Semantics/omp-workshare03.f90 b/flang/test/Semantics/omp-workshare03.f90 index baebc0754f14..be7586f90ac3 100644 --- a/flang/test/Semantics/omp-workshare03.f90 +++ b/flang/test/Semantics/omp-workshare03.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.7.4 workshare Construct ! All array assignments, scalar assignments, and masked array assignments diff --git a/flang/test/Semantics/omp-workshare04.f90 b/flang/test/Semantics/omp-workshare04.f90 index 63c91f75e8ff..6742174cea79 100644 --- a/flang/test/Semantics/omp-workshare04.f90 +++ b/flang/test/Semantics/omp-workshare04.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.7.4 workshare Construct ! Checks for OpenMP Workshare construct diff --git a/flang/test/Semantics/omp-workshare05.f90 b/flang/test/Semantics/omp-workshare05.f90 index f131da852985..ab0f6d0b18a8 100644 --- a/flang/test/Semantics/omp-workshare05.f90 +++ b/flang/test/Semantics/omp-workshare05.f90 @@ -1,4 +1,4 @@ -! RUN: %S/test_errors.sh %s %t %f18 -fopenmp +! RUN: %S/test_errors.sh %s %t %flang -fopenmp ! OpenMP Version 4.5 ! 2.7.4 workshare Construct ! Checks for OpenMP Parallel constructs enclosed in Workshare constructs