Lines Matching refs:construct

30 TYPE_PARSER(construct<BOZLiteralConstant>(BOZLiteral{}))
34     construct<ArrayConstructor>(
38 TYPE_PARSER(construct<AcSpec>(maybe(typeSpec / "::"),
41     construct<AcSpec>(typeSpec / "::"))
48         construct<AcValue>(construct<AcValue::Triplet>(scalarIntExpr,
50     construct<AcValue>(indirect(expr)) ||
51     construct<AcValue>(indirect(Parser<AcImpliedDo>{})))
55     construct<AcImpliedDo>(nonemptyList(Parser<AcValue>{} / lookAhead(","_tok)),
62 TYPE_PARSER(construct<AcImpliedDoControl>(
72     first(construct<Expr>(indirect(Parser<CharLiteralConstantSubstring>{})),
73         construct<Expr>(literalConstant),
74         construct<Expr>(construct<Expr::Parentheses>(parenthesized(expr))),
75         construct<Expr>(indirect(functionReference) / !"("_tok / !"%"_tok),
76         construct<Expr>(designator / !"("_tok / !"%"_tok),
77         construct<Expr>(indirect(Parser<SubstringInquiry>{})), // %LEN or %KIND
78         construct<Expr>(Parser<StructureConstructor>{}),
79         construct<Expr>(Parser<ArrayConstructor>{}),
83             construct<Expr>(parenthesized(
84                 construct<Expr::ComplexConstructor>(expr, "," >> expr)))),
87             construct<Expr>("%LOC" >> parenthesized(construct<Expr::PercentLoc>(
94         construct<Expr>(construct<Expr::DefinedUnary>(definedOpName, primary)),
97             construct<Expr>(construct<Expr::UnaryPlus>("+" >> primary))),
100             construct<Expr>(construct<Expr::Negate>("-" >> primary)))))};
169             construct<Expr>(construct<Expr::UnaryPlus>("+" >> addOperand)) ||  in Parse()
170             construct<Expr>(construct<Expr::Negate>("-" >> addOperand))) ||  in Parse()
416     space >> construct<DefinedOpName>(sourced("."_ch >>
417                  some(definedOpNameChar) >> construct<Name>() / "."_ch)))
420 TYPE_PARSER(construct<SpecificationExpr>(scalarIntExpr))
424     construct<AssignmentStmt>(variable / "=", expr))
440     construct<PointerAssignmentStmt>(dataRef,
442         construct<PointerAssignmentStmt>(dataRef,
447 TYPE_PARSER(construct<BoundsSpec>(boundExpr / ":"))
450 TYPE_PARSER(construct<BoundsRemapping>(boundExpr / ":", boundExpr))
454 TYPE_PARSER(construct<ProcComponentRef>(structureComponent))
460     construct<WhereStmt>("WHERE" >> parenthesized(logicalExpr), assignmentStmt))
467     construct<WhereConstruct>(statement(Parser<WhereConstructStmt>{}),
469         many(construct<WhereConstruct::MaskedElsewhere>(
472         maybe(construct<WhereConstruct::Elsewhere>(
478     construct<WhereConstructStmt>(
483 TYPE_PARSER(construct<WhereBodyConstruct>(statement(assignmentStmt)) ||
484     construct<WhereBodyConstruct>(statement(whereStmt)) ||
485     construct<WhereBodyConstruct>(indirect(whereConstruct)))
490     construct<MaskedElsewhereStmt>(
495     construct<ElsewhereStmt>("ELSE WHERE" >> maybe(name)))
499     construct<EndWhereStmt>(
505     construct<ForallConstruct>(statement(Parser<ForallConstructStmt>{}),
512     construct<ForallConstructStmt>(
518 TYPE_PARSER(construct<ForallBodyConstruct>(statement(forallAssignmentStmt)) ||
519     construct<ForallBodyConstruct>(statement(whereStmt)) ||
520     construct<ForallBodyConstruct>(whereConstruct) ||
521     construct<ForallBodyConstruct>(indirect(forallConstruct)) ||
522     construct<ForallBodyConstruct>(statement(forallStmt)))
525 TYPE_PARSER(construct<ForallAssignmentStmt>(assignmentStmt) ||
526     construct<ForallAssignmentStmt>(pointerAssignmentStmt))
530     construct<EndForallStmt>(
535     construct<ForallStmt>("FORALL" >> indirect(concurrentHeader),