protected SingleLineParser(string name, ILineMatcher lineMatcher, ILineParser dataParser, ILineParser commentParser, IImpliedModelParser[] impliedModelParsers, ModelFactoryDelegate modelFactory)
 {
     this.name = name;
     this.lineMatcher = lineMatcher;
     this.dataParser = dataParser;
     this.commentParser = commentParser;
     this.impliedModelParsers = impliedModelParsers;
     this.modelFactory = modelFactory;
 }
        public void ImpliedOccursAndDataType()
        {
            IModel model = new CobolModel("Redefines", "PROFILE-CHAR REDEFINES PROFILE PIC X(1) OCCURS 250 INDEXED BY PROFILE-CHAR-IDX", "[ 106] Single character of a security profile.");
            IImpliedModelParser modelParser = RedefinesParser.OccursAndDataImpliedParser();

            Assert.That(modelParser.Matches(model), Is.True);

            IModel parsed = modelParser.Parse(model);

            IModel expected =
                Build.Redefines("PROFILE-CHAR REDEFINES PROFILE", "[ 106] Single character of a security profile.")
                .With(
                    Build.Occurs("OCCURS 250 INDEXED BY PROFILE-CHAR-IDX", "Implied")
                    .WithDataType("PIC X(1)", "Implied")
                    ).Model();

            AssertModelIsSame(parsed, expected, true);
        }
Пример #3
0
 public HierarchicalImpliedModelParser(IImpliedModelParser parentParser, IImpliedModelParser childParser)
 {
     this.parentParser = parentParser;
     this.childParser  = childParser;
 }
 public HierarchicalImpliedModelParser(IImpliedModelParser parentParser, IImpliedModelParser childParser)
 {
     this.parentParser = parentParser;
     this.childParser = childParser;
 }