Lines Matching refs:construct
36 first(construct<ExecutableConstruct>(CapturedLabelDoStmt{}),
37 construct<ExecutableConstruct>(EndDoStmtForCapturedLabelDoStmt{}),
38 construct<ExecutableConstruct>(indirect(Parser<DoConstruct>{})),
41 construct<ExecutableConstruct>(statement(actionStmt)),
42 construct<ExecutableConstruct>(indirect(Parser<AssociateConstruct>{})),
43 construct<ExecutableConstruct>(indirect(Parser<BlockConstruct>{})),
44 construct<ExecutableConstruct>(indirect(Parser<CaseConstruct>{})),
45 construct<ExecutableConstruct>(indirect(Parser<ChangeTeamConstruct>{})),
46 construct<ExecutableConstruct>(indirect(Parser<CriticalConstruct>{})),
47 construct<ExecutableConstruct>(indirect(Parser<IfConstruct>{})),
48 construct<ExecutableConstruct>(indirect(Parser<SelectRankConstruct>{})),
49 construct<ExecutableConstruct>(indirect(Parser<SelectTypeConstruct>{})),
50 construct<ExecutableConstruct>(indirect(whereConstruct)),
51 construct<ExecutableConstruct>(indirect(forallConstruct)),
52 construct<ExecutableConstruct>(indirect(ompEndLoopDirective)),
53 construct<ExecutableConstruct>(indirect(openmpConstruct)),
54 construct<ExecutableConstruct>(indirect(accEndCombinedDirective)),
55 construct<ExecutableConstruct>(indirect(openaccConstruct)),
56 construct<ExecutableConstruct>(indirect(compilerDirective)))};
64 construct<ExecutionPartConstruct>(construct<ErrorRecovery>(ok /
71 first(construct<ExecutionPartConstruct>(executableConstruct),
72 construct<ExecutionPartConstruct>(
74 construct<ExecutionPartConstruct>(
76 construct<ExecutionPartConstruct>(
80 construct<ExecutionPartConstruct>(
83 construct<ExecutionPartConstruct>(executionPartErrorRecovery)))
87 construct<ExecutionPart>(many(executionPartConstruct)))
101 TYPE_PARSER(first(construct<ActionStmt>(indirect(Parser<AllocateStmt>{})),
102 construct<ActionStmt>(indirect(assignmentStmt)),
103 construct<ActionStmt>(indirect(pointerAssignmentStmt)),
104 construct<ActionStmt>(indirect(Parser<BackspaceStmt>{})),
105 construct<ActionStmt>(indirect(Parser<CallStmt>{})),
106 construct<ActionStmt>(indirect(Parser<CloseStmt>{})),
107 construct<ActionStmt>(construct<ContinueStmt>("CONTINUE"_tok)),
108 construct<ActionStmt>(indirect(Parser<CycleStmt>{})),
109 construct<ActionStmt>(indirect(Parser<DeallocateStmt>{})),
110 construct<ActionStmt>(indirect(Parser<EndfileStmt>{})),
111 construct<ActionStmt>(indirect(Parser<EventPostStmt>{})),
112 construct<ActionStmt>(indirect(Parser<EventWaitStmt>{})),
113 construct<ActionStmt>(indirect(Parser<ExitStmt>{})),
114 construct<ActionStmt>(construct<FailImageStmt>("FAIL IMAGE"_sptok)),
115 construct<ActionStmt>(indirect(Parser<FlushStmt>{})),
116 construct<ActionStmt>(indirect(Parser<FormTeamStmt>{})),
117 construct<ActionStmt>(indirect(Parser<GotoStmt>{})),
118 construct<ActionStmt>(indirect(Parser<IfStmt>{})),
119 construct<ActionStmt>(indirect(Parser<InquireStmt>{})),
120 construct<ActionStmt>(indirect(Parser<LockStmt>{})),
121 construct<ActionStmt>(indirect(Parser<NullifyStmt>{})),
122 construct<ActionStmt>(indirect(Parser<OpenStmt>{})),
123 construct<ActionStmt>(indirect(Parser<PrintStmt>{})),
124 construct<ActionStmt>(indirect(Parser<ReadStmt>{})),
125 construct<ActionStmt>(indirect(Parser<ReturnStmt>{})),
126 construct<ActionStmt>(indirect(Parser<RewindStmt>{})),
127 construct<ActionStmt>(indirect(Parser<StopStmt>{})), // & error-stop-stmt
128 construct<ActionStmt>(indirect(Parser<SyncAllStmt>{})),
129 construct<ActionStmt>(indirect(Parser<SyncImagesStmt>{})),
130 construct<ActionStmt>(indirect(Parser<SyncMemoryStmt>{})),
131 construct<ActionStmt>(indirect(Parser<SyncTeamStmt>{})),
132 construct<ActionStmt>(indirect(Parser<UnlockStmt>{})),
133 construct<ActionStmt>(indirect(Parser<WaitStmt>{})),
134 construct<ActionStmt>(indirect(whereStmt)),
135 construct<ActionStmt>(indirect(Parser<WriteStmt>{})),
136 construct<ActionStmt>(indirect(Parser<ComputedGotoStmt>{})),
137 construct<ActionStmt>(indirect(forallStmt)),
138 construct<ActionStmt>(indirect(Parser<ArithmeticIfStmt>{})),
139 construct<ActionStmt>(indirect(Parser<AssignStmt>{})),
140 construct<ActionStmt>(indirect(Parser<AssignedGotoStmt>{})),
141 construct<ActionStmt>(indirect(Parser<PauseStmt>{}))))
145 construct<AssociateConstruct>(statement(Parser<AssociateStmt>{}), block,
151 construct<AssociateStmt>(maybe(name / ":"),
155 TYPE_PARSER(construct<Association>(name, "=>" >> selector))
158 TYPE_PARSER(construct<Selector>(variable) / lookAhead(","_tok || ")"_tok) ||
159 construct<Selector>(expr))
162 TYPE_PARSER(construct<EndAssociateStmt>(
168 construct<BlockConstruct>(statement(Parser<BlockStmt>{}),
173 TYPE_PARSER(construct<BlockStmt>(maybe(name / ":") / "BLOCK"))
185 TYPE_PARSER(construct<BlockSpecificationPart>(specificationPart)) in TYPE_PARSER()
188 TYPE_PARSER(construct<EndBlockStmt>( in TYPE_PARSER()
193 construct<ChangeTeamConstruct>(statement(Parser<ChangeTeamStmt>{}), block, in TYPE_PARSER()
200 construct<ChangeTeamStmt>(maybe(name / ":"),
208 construct<CoarrayAssociation>(Parser<CodimensionDecl>{}, "=>" >> selector))
213 construct<EndChangeTeamStmt>(
220 construct<CriticalStmt>(maybe(name / ":"),
225 construct<CriticalConstruct>(statement(Parser<CriticalStmt>{}), block,
229 TYPE_PARSER(construct<EndCriticalStmt>(
235 construct<DoConstruct>(
242 TYPE_PARSER(parenthesized(construct<ConcurrentHeader>(
250 TYPE_PARSER(construct<ConcurrentControl>(name / "=", scalarIntExpr / ":",
256 TYPE_PARSER(construct<LocalitySpec>(construct<LocalitySpec::Local>(
258 construct<LocalitySpec>(construct<LocalitySpec::LocalInit>(
260 construct<LocalitySpec>(construct<LocalitySpec::Shared>(
262 construct<LocalitySpec>(
263 construct<LocalitySpec::DefaultNone>("DEFAULT ( NONE )"_tok)))
273 (construct<LoopControl>(loopBounds(scalarExpr)) ||
274 construct<LoopControl>(
276 construct<LoopControl>(construct<LoopControl::Concurrent>(
282 construct<LabelDoStmt>(
287 construct<NonLabelDoStmt>(maybe(name / ":"), "DO" >> maybe(loopControl)))
291 construct<EndDoStmt>(
296 "CYCLE statement"_en_US, construct<CycleStmt>("CYCLE" >> maybe(name)))
307 construct<IfConstruct>(
308 statement(construct<IfThenStmt>(maybe(name / ":"),
311 many(construct<IfConstruct::ElseIfBlock>(
312 unambiguousStatement(construct<ElseIfStmt>(
316 maybe(construct<IfConstruct::ElseBlock>(
317 statement(construct<ElseStmt>("ELSE" >> maybe(name))), block)),
318 statement(construct<EndIfStmt>(
323 construct<IfStmt>("IF" >> parenthesized(scalarLogicalExpr),
329 construct<CaseConstruct>(statement(Parser<SelectCaseStmt>{}),
330 many(construct<CaseConstruct::Case>(
337 construct<SelectCaseStmt>(
342 construct<CaseStmt>("CASE" >> Parser<CaseSelector>{}, maybe(name)))
347 TYPE_PARSER(construct<EndSelectStmt>(
351 constexpr auto defaultKeyword{construct<Default>("DEFAULT"_tok)};
352 TYPE_PARSER(parenthesized(construct<CaseSelector>( in parenthesized()
354 construct<CaseSelector>(defaultKeyword))
361 TYPE_PARSER(construct<CaseValueRange>(construct<CaseValueRange::Range>(
362 construct<std::optional<CaseValue>>(caseValue),
364 construct<CaseValueRange>(
365 construct<CaseValueRange::Range>(construct<std::optional<CaseValue>>(),
366 ":" >> construct<std::optional<CaseValue>>(caseValue))) ||
367 construct<CaseValueRange>(caseValue))
373 construct<SelectRankConstruct>(statement(Parser<SelectRankStmt>{}),
374 many(construct<SelectRankConstruct::RankCase>(
382 construct<SelectRankStmt>(maybe(name / ":"),
390 "RANK" >> (construct<SelectRankCaseStmt>(
391 parenthesized(construct<SelectRankCaseStmt::Rank>(
393 construct<SelectRankCaseStmt::Rank>(star)) ||
394 construct<SelectRankCaseStmt::Rank>(defaultKeyword),
400 construct<SelectTypeConstruct>(statement(Parser<SelectTypeStmt>{}),
401 many(construct<SelectTypeConstruct::TypeCase>(
409 construct<SelectTypeStmt>(maybe(name / ":"),
417 construct<TypeGuardStmt>("TYPE IS"_sptok >>
418 parenthesized(construct<TypeGuardStmt::Guard>(typeSpec)) ||
419 "CLASS IS"_sptok >> parenthesized(construct<TypeGuardStmt::Guard>(
421 construct<TypeGuardStmt::Guard>("CLASS" >> defaultKeyword),
426 "EXIT statement"_en_US, construct<ExitStmt>("EXIT" >> maybe(name)))
430 "GOTO statement"_en_US, construct<GotoStmt>("GO TO" >> label))
434 construct<ComputedGotoStmt>("GO TO" >> parenthesized(nonemptyList(label)),
441 construct<StopStmt>("STOP" >> pure(StopStmt::Kind::Stop) ||
448 TYPE_PARSER(construct<StopCode>(scalar(expr))) in TYPE_PARSER()
452 construct<SyncAllStmt>("SYNC ALL"_sptok >> in TYPE_PARSER()
458 "SYNC IMAGES"_sptok >> parenthesized(construct<SyncImagesStmt>( in TYPE_PARSER()
459 construct<SyncImagesStmt::ImageSet>(intExpr) || in TYPE_PARSER()
460 construct<SyncImagesStmt::ImageSet>(star), in TYPE_PARSER()
465 construct<SyncMemoryStmt>("SYNC MEMORY"_sptok >> in TYPE_PARSER()
470 construct<SyncTeamStmt>("SYNC TEAM"_sptok >> "("_tok >> teamValue, in TYPE_PARSER()
476 construct<EventPostStmt>("EVENT POST"_sptok >> "("_tok >> scalar(variable), in TYPE_PARSER()
482 construct<EventWaitStmt>("EVENT WAIT"_sptok >> "("_tok >> scalar(variable), in TYPE_PARSER()
490 TYPE_PARSER(construct<EventWaitStmt::EventWaitSpec>(untilSpec) ||
491 construct<EventWaitStmt::EventWaitSpec>(statOrErrmsg))
500 construct<FormTeamStmt>("FORM TEAM"_sptok >> "("_tok >> scalarIntExpr,
507 construct<FormTeamStmt::FormTeamSpec>("NEW_INDEX =" >> scalarIntExpr) ||
508 construct<FormTeamStmt::FormTeamSpec>(statOrErrmsg))
515 construct<LockStmt>("LOCK (" >> lockVariable,
520 construct<LockStmt::LockStat>("ACQUIRED_LOCK =" >> scalarLogicalVariable) ||
521 construct<LockStmt::LockStat>(statOrErrmsg))
525 construct<UnlockStmt>("UNLOCK (" >> lockVariable,