Lines Matching refs:maybe

204             construct<IntrinsicTypeSpec::Real>("REAL" >> maybe(kindSelector))),
208             "COMPLEX" >> maybe(kindSelector))),
210             "CHARACTER" >> maybe(Parser<CharSelector>{}))),
212             "LOGICAL" >> maybe(kindSelector))),
222 TYPE_PARSER(construct<IntegerTypeSpec>("INTEGER" >> maybe(kindSelector)))
227                 parenthesized(maybe("KIND ="_tok) >> scalarIntConstantExpr)) ||
235     SignedIntLiteralConstantWithoutKind{}, maybe(underscore >> kindParam))))
241     space >> digitString, maybe(underscore >> kindParam) / !underscore))
256     construct<SignedRealLiteralConstant>(maybe(sign), realLiteralConstant)};
277                             maybe(digitString) >> maybe(exponentPart) >> ok ||
278                         "."_ch >> digitString >> maybe(exponentPart) >> ok ||
281             maybe(underscore >> kindParam)))
311         typeParamValue / ",", maybe("KIND ="_tok) >> scalarIntConstantExpr)) ||
313         "KIND =" >> scalarIntConstantExpr, maybe(", LEN =" >> typeParamValue))))
321                 parenthesized(maybe("LEN ="_tok) >> typeParamValue)) ||
347                 logicalTRUE, maybe(underscore >> kindParam)) ||
349         logicalFALSE, maybe(underscore >> kindParam)))
362         maybe(Parser<TypeBoundProcedurePart>{}),
387     recovery("END TYPE" >> maybe(name), endStmtErrorRecovery)))
402 TYPE_PARSER(construct<TypeParamDecl>(name, maybe("=" >> scalarIntConstantExpr)))
443     construct<ComponentDecl>(name, maybe(Parser<ComponentArraySpec>{}),
444         maybe(coarraySpec), maybe("*" >> charLength), maybe(initialization)))
450             maybe(Parser<ComponentArraySpec>{}), maybe("*" >> charLength))))
467         "PROCEDURE" >> parenthesized(maybe(procInterface)),
476 constexpr auto pass{construct<Pass>("PASS" >> maybe(parenthesized(name)))};
508         maybe(statement(Parser<PrivateStmt>{})),
542 TYPE_PARSER(construct<TypeBoundProcDecl>(name, maybe("=>" >> name)))
547     construct<TypeBoundGenericStmt>("GENERIC" >> maybe("," >> accessSpec),
560     construct<FinalProcedureStmt>("FINAL" >> maybe("::"_tok) >> listOfNames))
568 TYPE_PARSER(construct<TypeParamSpec>(maybe(keyword / "="), typeParamValue))
584     maybe(keyword / "="), Parser<ComponentDataSource>{}))
602     construct<EnumeratorDefStmt>("ENUMERATOR" >> maybe("::"_tok) >>
607     construct<Enumerator>(namedConstant, maybe("=" >> scalarIntConstantExpr)))
616     maybe(arraySpec), maybe(coarraySpec), maybe("*" >> charLength),
617     !"="_tok >> maybe(initialization))}; // old-style REAL A/0/ still works
665 TYPE_PARSER(construct<EntityDecl>(objectName, maybe(arraySpec),
666     maybe(coarraySpec), maybe("*" >> charLength), maybe(initialization)))
679     "BIND ( C" >> maybe(", NAME =" >> scalarDefaultCharConstantExpr) / ")"))
700     many(explicitShapeSpec / ","), maybe(specificationExpr / ":") / "*"))
723     maybe(specificationExpr / ":"), specificationExpr))
726 TYPE_PARSER(construct<AssumedShapeSpec>(maybe(specificationExpr) / ":"))
734 TYPE_PARSER(construct<AssumedImpliedSpec>(maybe(specificationExpr / ":") / "*"))
756     defaulted(maybe("::"_tok) >>  in TYPE_PARSER()
765 TYPE_PARSER(construct<AllocatableStmt>("ALLOCATABLE" >> maybe("::"_tok) >>
774     construct<ObjectDecl>(objectName, maybe(arraySpec), maybe(coarraySpec)))
777 TYPE_PARSER(construct<AsynchronousStmt>("ASYNCHRONOUS" >> maybe("::"_tok) >>
781 TYPE_PARSER(construct<BindStmt>(languageBindingSpec / maybe("::"_tok),
789 TYPE_PARSER(construct<CodimensionStmt>("CODIMENSION" >> maybe("::"_tok) >>
797 TYPE_PARSER(construct<ContiguousStmt>("CONTIGUOUS" >> maybe("::"_tok) >>
803         "DATA" >> nonemptySeparated(Parser<DataStmtSet>{}, maybe(","_tok))))
825     maybe(integerTypeSpec / "::"), loopBounds(scalarIntConstantExpr))))
834     maybe(Parser<DataStmtRepeat>{} / "*"), Parser<DataStmtConstant>{}))
873     construct<DimensionStmt>("DIMENSION" >> maybe("::"_tok) >>
880         "INTENT" >> parenthesized(intentSpec) / maybe("::"_tok), listOfNames))
884     construct<OptionalStmt>("OPTIONAL" >> maybe("::"_tok) >> listOfNames))
901 TYPE_PARSER(construct<PointerStmt>("POINTER" >> maybe("::"_tok) >>
908     construct<PointerDecl>(name, maybe(parenthesized(deferredShapeSpecList))))  in TYPE_PARSER()
912     construct<ProtectedStmt>("PROTECTED" >> maybe("::"_tok) >> listOfNames))  in TYPE_PARSER()
916     "SAVE" >> defaulted(maybe("::"_tok) >>  in TYPE_PARSER()
926 TYPE_PARSER(construct<TargetStmt>("TARGET" >> maybe("::"_tok) >>
930 TYPE_PARSER(construct<ValueStmt>("VALUE" >> maybe("::"_tok) >> listOfNames))
933 TYPE_PARSER(construct<VolatileStmt>("VOLATILE" >> maybe("::"_tok) >>
978 TYPE_PARSER(space >> (construct<LetterSpec>(letter, maybe("-" >> letter)) ||
993             "IMPORT" >> maybe("::"_tok) >> optionalList(name)))
1002         maybe(","_tok))))
1018     construct<CommonStmt>("COMMON" >> defaulted("/" >> maybe(name) / "/"),  in TYPE_PARSER()
1021         many(maybe(","_tok) >>
1022             construct<CommonStmt::Block>("/" >> maybe(name) / "/",
1027 TYPE_PARSER(construct<CommonBlockObject>(name, maybe(arraySpec)))
1083     maybe(scalarIntExpr), ":" >> maybe(scalarIntExpr)))
1095     maybe(Parser<ImageSelector>{})))
1114     maybe(subscript), ":" >> maybe(subscript), maybe(":" >> subscript)))
1138     construct<AllocateStmt>("ALLOCATE (" >> maybe(typeSpec / "::"),
1160     maybe(bracketed(Parser<AllocateCoarraySpec>{}))))
1168 TYPE_PARSER(construct<AllocateShapeSpec>(maybe(boundExpr / ":"), boundExpr))
1174     maybe(boundExpr / ":") / "*"))
1210                           maybe(("="_tok || ":"_tok) >> digitString64))))) /
1218                              objectName, maybe(Parser<ArraySpec>{}) / ")")))))
1223     "STRUCTURE" >> maybe(sourced("/" >> name / "/")), optionalList(entityDecl)))
1265         defaulted(maybe(","_tok) >>
1270         construct<PauseStmt>("PAUSE" >> maybe(Parser<StopCode>{}))))