Remove fallback from prescriptiveness

Author: kparzysz

flang/include/flang/Parser/parse-tree.h

@@ -4132,9 +4132,8 @@ struct OmpOrderModifier {
 //
 // prescriptiveness ->
 //    STRICT                                        // since 5.1
-//    FALLBACK                                      // since 6.1
 struct OmpPrescriptiveness {
-  ENUM_CLASS(Value, Strict, Fallback)
+  ENUM_CLASS(Value, Strict)
   WRAPPER_CLASS_BOILERPLATE(OmpPrescriptiveness, Value);
 };
 

flang/lib/Lower/OpenMP/Clauses.cpp

@@ -394,8 +394,6 @@ makePrescriptiveness(parser::OmpPrescriptiveness::Value v) {
   switch (v) {
   case parser::OmpPrescriptiveness::Value::Strict:
     return clause::Prescriptiveness::Strict;
-  case parser::OmpPrescriptiveness::Value::Fallback:
-    return clause::Prescriptiveness::Fallback;
   }
   llvm_unreachable("Unexpected prescriptiveness");
 }
@@ -820,7 +818,7 @@ DynGroupprivate make(const parser::OmpClause::DynGroupprivate &inp,
   auto &size = std::get<parser::ScalarIntExpr>(inp.v.t);
 
   return DynGroupprivate{{/*AccessGroup=*/maybeApplyToV(makeAccessGroup, m0),
-                          /*Prescriptiveness=*/maybeApplyToV(makeFallback, m1),
+                          /*Fallback=*/maybeApplyToV(makeFallback, m1),
                           /*Size=*/makeExpr(size, semaCtx)}};
 }
 

flang/lib/Parser/openmp-parsers.cpp

@@ -863,8 +863,7 @@ TYPE_PARSER(construct<OmpOrderingModifier>(
     "SIMD" >> pure(OmpOrderingModifier::Value::Simd)))
 
 TYPE_PARSER(construct<OmpPrescriptiveness>(
-    "STRICT" >> pure(OmpPrescriptiveness::Value::Strict) ||
-    "FALLBACK" >> pure(OmpPrescriptiveness::Value::Fallback)))
+    "STRICT" >> pure(OmpPrescriptiveness::Value::Strict)))
 
 TYPE_PARSER(construct<OmpPresentModifier>( //
     "PRESENT" >> pure(OmpPresentModifier::Value::Present)))

llvm/include/llvm/Frontend/OpenMP/ClauseT.h

@@ -242,7 +242,7 @@ ENUM(MotionExpectation, Present);
 // V5.2: [15.9.1] `task-dependence-type` modifier
 ENUM(DependenceType, Depobj, In, Inout, Inoutset, Mutexinoutset, Out, Sink,
      Source);
-ENUM(Prescriptiveness, Strict, Fallback);
+ENUM(Prescriptiveness, Strict);
 
 template <typename I, typename E> //
 struct LoopIterationT {