Lines Matching refs:format
160 "," >> construct<std::optional<Format>>(format),
171 construct<std::optional<Format>>(format),
192 construct<IoControlSpec>("FMT =" >> format),
242 "," >> construct<std::optional<Format>>(format),
256 "PRINT" >> format, defaulted("," >> nonemptyList(outputItem))))
529 construct<FormatStmt>("FORMAT" >> Parser<format::FormatSpecification>{}))
538 nonemptySeparated(space >> Parser<format::FormatItem>{}, maybe(","_tok))};
546 TYPE_PARSER(construct<format::FormatItem>(
547 maybe(repeat), Parser<format::IntrinsicTypeDataEditDesc>{}) ||
548 construct<format::FormatItem>(
549 maybe(repeat), Parser<format::DerivedTypeDataEditDesc>{}) ||
550 construct<format::FormatItem>(Parser<format::ControlEditDesc>{}) ||
551 construct<format::FormatItem>(charStringEditDesc) ||
552 construct<format::FormatItem>(maybe(repeat), parenthesized(formatItems)))
558 TYPE_PARSER(parenthesized(construct<format::FormatSpecification>(
561 construct<format::FormatSpecification>(defaulted(formatItems))))
583 TYPE_PARSER(construct<format::IntrinsicTypeDataEditDesc>(
584 "I " >> pure(format::IntrinsicTypeDataEditDesc::Kind::I) ||
585 "B " >> pure(format::IntrinsicTypeDataEditDesc::Kind::B) ||
586 "O " >> pure(format::IntrinsicTypeDataEditDesc::Kind::O) ||
587 "Z " >> pure(format::IntrinsicTypeDataEditDesc::Kind::Z),
589 construct<format::IntrinsicTypeDataEditDesc>(
590 "F " >> pure(format::IntrinsicTypeDataEditDesc::Kind::F) ||
591 "D " >> pure(format::IntrinsicTypeDataEditDesc::Kind::D),
593 construct<format::IntrinsicTypeDataEditDesc>(
594 "E " >> ("N " >> pure(format::IntrinsicTypeDataEditDesc::Kind::EN) ||
595 "S " >> pure(format::IntrinsicTypeDataEditDesc::Kind::ES) ||
596 "X " >> pure(format::IntrinsicTypeDataEditDesc::Kind::EX) ||
597 pure(format::IntrinsicTypeDataEditDesc::Kind::E)),
599 construct<format::IntrinsicTypeDataEditDesc>(
600 "G " >> pure(format::IntrinsicTypeDataEditDesc::Kind::G),
602 construct<format::IntrinsicTypeDataEditDesc>(
603 "G " >> pure(format::IntrinsicTypeDataEditDesc::Kind::G) ||
604 "L " >> pure(format::IntrinsicTypeDataEditDesc::Kind::L),
606 construct<format::IntrinsicTypeDataEditDesc>(
607 "A " >> pure(format::IntrinsicTypeDataEditDesc::Kind::A), maybe(width),
612 construct<format::IntrinsicTypeDataEditDesc>(
613 "I " >> pure(format::IntrinsicTypeDataEditDesc::Kind::I) ||
615 pure(format::IntrinsicTypeDataEditDesc::Kind::B) ||
616 "O " >> pure(format::IntrinsicTypeDataEditDesc::Kind::O) ||
617 "Z " >> pure(format::IntrinsicTypeDataEditDesc::Kind::Z) ||
618 "F " >> pure(format::IntrinsicTypeDataEditDesc::Kind::F) ||
620 pure(format::IntrinsicTypeDataEditDesc::Kind::D) ||
623 pure(format::IntrinsicTypeDataEditDesc::Kind::EN) ||
625 pure(format::IntrinsicTypeDataEditDesc::Kind::ES) ||
627 pure(format::IntrinsicTypeDataEditDesc::Kind::EX) ||
628 pure(format::IntrinsicTypeDataEditDesc::Kind::E)) ||
629 "G " >> pure(format::IntrinsicTypeDataEditDesc::Kind::G) ||
630 "L " >> pure(format::IntrinsicTypeDataEditDesc::Kind::L),
636 TYPE_PARSER(construct<format::DerivedTypeDataEditDesc>(
653 TYPE_PARSER(construct<format::ControlEditDesc>(
654 "T L " >> pure(format::ControlEditDesc::Kind::TL) ||
655 "T R " >> pure(format::ControlEditDesc::Kind::TR) ||
656 "T " >> pure(format::ControlEditDesc::Kind::T),
658 construct<format::ControlEditDesc>(count,
659 "X " >> pure(format::ControlEditDesc::Kind::X) ||
660 "/" >> pure(format::ControlEditDesc::Kind::Slash)) ||
661 construct<format::ControlEditDesc>(
662 "X " >> pure(format::ControlEditDesc::Kind::X) ||
663 "/" >> pure(format::ControlEditDesc::Kind::Slash)) ||
664 construct<format::ControlEditDesc>(
665 scaleFactor, "P " >> pure(format::ControlEditDesc::Kind::P)) ||
666 construct<format::ControlEditDesc>(
667 ":" >> pure(format::ControlEditDesc::Kind::Colon)) ||
668 "S " >> ("S " >> construct<format::ControlEditDesc>(
669 pure(format::ControlEditDesc::Kind::SS)) ||
670 "P " >> construct<format::ControlEditDesc>(
671 pure(format::ControlEditDesc::Kind::SP)) ||
672 construct<format::ControlEditDesc>(
673 pure(format::ControlEditDesc::Kind::S))) ||
674 "B " >> ("N " >> construct<format::ControlEditDesc>(
675 pure(format::ControlEditDesc::Kind::BN)) ||
676 "Z " >> construct<format::ControlEditDesc>(
677 pure(format::ControlEditDesc::Kind::BZ))) ||
678 "R " >> ("U " >> construct<format::ControlEditDesc>(
679 pure(format::ControlEditDesc::Kind::RU)) ||
680 "D " >> construct<format::ControlEditDesc>(
681 pure(format::ControlEditDesc::Kind::RD)) ||
682 "Z " >> construct<format::ControlEditDesc>(
683 pure(format::ControlEditDesc::Kind::RZ)) ||
684 "N " >> construct<format::ControlEditDesc>(
685 pure(format::ControlEditDesc::Kind::RN)) ||
686 "C " >> construct<format::ControlEditDesc>(
687 pure(format::ControlEditDesc::Kind::RC)) ||
688 "P " >> construct<format::ControlEditDesc>(
689 pure(format::ControlEditDesc::Kind::RP))) ||
690 "D " >> ("C " >> construct<format::ControlEditDesc>(
691 pure(format::ControlEditDesc::Kind::DC)) ||
692 "P " >> construct<format::ControlEditDesc>(
693 pure(format::ControlEditDesc::Kind::DP))) ||
696 "$" >> construct<format::ControlEditDesc>(
697 pure(format::ControlEditDesc::Kind::Dollar)) ||
698 "\\" >> construct<format::ControlEditDesc>(
699 pure(format::ControlEditDesc::Kind::Backslash))))