Ejemplo n.º 1
0
        public void H(_NestedCall_Memo _memo, int _index, _NestedCall_Args _args)
        {
            int _arg_index       = 0;
            int _arg_input_index = 0;

            _NestedCall_Item h = null;

            // ARGS 0
            _arg_index       = 0;
            _arg_input_index = 0;

            // ANY
            _ParseAnyArgs(_memo, ref _arg_index, ref _arg_input_index, _args);

            // BIND h
            h = _memo.ArgResults.Peek();

            if (_memo.ArgResults.Pop() == null)
            {
                _memo.Results.Push(null);
                goto label0;
            }

            // CALL C
            var _start_i3 = _index;
            _NestedCall_Item _r3;

            _NestedCall_Args _actual_args3 = new _NestedCall_Item[] { new _NestedCall_Item(Alpha) };

            if (_args != null)
            {
                _actual_args3 = _actual_args3.Concat(_args.Skip(_arg_index));
            }
            _r3 = _MemoCall(_memo, "C", _index, C, _actual_args3);

            if (_r3 != null)
            {
                _index = _r3.NextIndex;
            }

label0:                                    // ARGS 0
            _arg_input_index = _arg_index; // no-op for label
        }
Ejemplo n.º 2
0
        public void G(_NestedCall_Memo _memo, int _index, _NestedCall_Args _args)
        {
            int _arg_index       = 0;
            int _arg_input_index = 0;

            // CALL C
            var _start_i0 = _index;
            _NestedCall_Item _r0;

            _NestedCall_Args _actual_args0 = new _NestedCall_Item[] { new _NestedCall_Item(Alpha) };

            if (_args != null)
            {
                _actual_args0 = _actual_args0.Concat(_args.Skip(_arg_index));
            }
            _r0 = _MemoCall(_memo, "C", _index, C, _actual_args0);

            if (_r0 != null)
            {
                _index = _r0.NextIndex;
            }
        }
Ejemplo n.º 3
0
        public void I(_NestedCall_Memo _memo, int _index, _NestedCall_Args _args)
        {
            int _arg_index       = 0;
            int _arg_input_index = 0;

            // CALL H
            var _start_i0 = _index;
            _NestedCall_Item _r0;
            var _arg0_0 = "i";

            _NestedCall_Args _actual_args0 = new _NestedCall_Item[] { new _NestedCall_Item(_arg0_0) };

            if (_args != null)
            {
                _actual_args0 = _actual_args0.Concat(_args.Skip(_arg_index));
            }
            _r0 = _MemoCall(_memo, "H", _index, H, _actual_args0);

            if (_r0 != null)
            {
                _index = _r0.NextIndex;
            }
        }
Ejemplo n.º 4
0
        public void Alpha(_NestedCall_Memo _memo, int _index, _NestedCall_Args _args)
        {
            int _arg_index       = 0;
            int _arg_input_index = 0;

            _NestedCall_Item x = null;
            _NestedCall_Item a = null;

            // ARGS 0
            _arg_index       = 0;
            _arg_input_index = 0;

            // ANY
            _ParseAnyArgs(_memo, ref _arg_index, ref _arg_input_index, _args);

            // BIND x
            x = _memo.ArgResults.Peek();

            if (_memo.ArgResults.Pop() == null)
            {
                _memo.Results.Push(null);
                goto label0;
            }

            // AND 4
            int _start_i4 = _index;

            // CALLORVAR x
            _NestedCall_Item _r6;

            if (x.Production != null)
            {
                var _p6 = (System.Action <_NestedCall_Memo, int, IEnumerable <_NestedCall_Item> >)(object) x.Production;
                _r6 = _MemoCall(_memo, x.Production.Method.Name, _index, _p6, _args != null ? _args.Skip(_arg_index) : null);
            }
            else
            {
                _r6 = _ParseLiteralObj(_memo, ref _index, x.Inputs);
            }

            if (_r6 != null)
            {
                _index = _r6.NextIndex;
            }

            // BIND a
            a = _memo.Results.Peek();

            // AND shortcut
            if (_memo.Results.Peek() == null)
            {
                _memo.Results.Push(null); goto label4;
            }

            // LITERAL "a"
            _ParseLiteralString(_memo, ref _index, "a");

label4:     // AND
            var _r4_2 = _memo.Results.Pop();
            var _r4_1 = _memo.Results.Pop();

            if (_r4_1 != null && _r4_2 != null)
            {
                _memo.Results.Push(new _NestedCall_Item(_start_i4, _index, _memo.InputEnumerable, _r4_1.Results.Concat(_r4_2.Results).Where(_NON_NULL), true));
            }
            else
            {
                _memo.Results.Push(null);
                _index = _start_i4;
            }

            // ACT
            var _r3 = _memo.Results.Peek();

            if (_r3 != null)
            {
                _memo.Results.Pop();
                _memo.Results.Push(new _NestedCall_Item(_r3.StartIndex, _r3.NextIndex, _memo.InputEnumerable, _Thunk(_IM_Result => { return(a); }, _r3), true));
            }

label0:                                    // ARGS 0
            _arg_input_index = _arg_index; // no-op for label
        }
Ejemplo n.º 5
0
        public void __nested_rule_1(_NestedCall_Memo _memo, int _index, _NestedCall_Args _args)
        {
            int _arg_index       = 0;
            int _arg_input_index = 0;

            _NestedCall_Item c = null;

            // ARGS 0
            _arg_index       = 0;
            _arg_input_index = 0;

            // ANY
            _ParseAnyArgs(_memo, ref _arg_index, ref _arg_input_index, _args);

            // BIND c
            c = _memo.ArgResults.Peek();

            if (_memo.ArgResults.Pop() == null)
            {
                _memo.Results.Push(null);
                goto label0;
            }

            // AND 3
            int _start_i3 = _index;

            // CALLORVAR c
            _NestedCall_Item _r4;

            if (c.Production != null)
            {
                var _p4 = (System.Action <_NestedCall_Memo, int, IEnumerable <_NestedCall_Item> >)(object) c.Production;
                _r4 = _MemoCall(_memo, c.Production.Method.Name, _index, _p4, _args != null ? _args.Skip(_arg_index) : null);
            }
            else
            {
                _r4 = _ParseLiteralObj(_memo, ref _index, c.Inputs);
            }

            if (_r4 != null)
            {
                _index = _r4.NextIndex;
            }

            // AND shortcut
            if (_memo.Results.Peek() == null)
            {
                _memo.Results.Push(null); goto label3;
            }

            // LITERAL "c"
            _ParseLiteralString(_memo, ref _index, "c");

label3:     // AND
            var _r3_2 = _memo.Results.Pop();
            var _r3_1 = _memo.Results.Pop();

            if (_r3_1 != null && _r3_2 != null)
            {
                _memo.Results.Push(new _NestedCall_Item(_start_i3, _index, _memo.InputEnumerable, _r3_1.Results.Concat(_r3_2.Results).Where(_NON_NULL), true));
            }
            else
            {
                _memo.Results.Push(null);
                _index = _start_i3;
            }

label0:                                    // ARGS 0
            _arg_input_index = _arg_index; // no-op for label
        }