Example #1
0
        void DoProcessItemTFS(TPredicateItemBase ABase, TDynamicArray AStack)
        {
            TPredicateItemTFS m_Tfs;
            TPredicateItemTFE m_Tfe;

            if (ABase != null)
            {
                int m_type = ABase.Who();
                if (m_type == 0)
                {
                    m_Tfs = (TPredicateItemTFS)(ABase);
                    for (int j = 0; j <= m_Tfs.TFECount - 1; j++)
                    {
                        m_Tfe = m_Tfs.GetTFEItems(j);
                        if (m_Tfe.Big != null)
                        {
                            AStack.InsertToFirst(m_Tfe.Big);
                        }
                    }
                }
                if (m_type == 1)
                {
                    AStack.InsertToFirst(ABase);
                }
            }
        }
Example #2
0
        void DoCopyTree(ref TPredicateItemBig ABig, ref TDynamicArray AStack)
        {
            int m_who;
            TAlternativeParserItemList ML;
            TAlternativeParserItemBase mBase;
            TAlternativeParserItemTFS  mTFS;
            TAlternativeParserItemBig  mBig;
            TPredicateItemTFE          mTFE;
            TAlternativeParserItemBig  mRfc = ABig.Rfc;

            ML = mRfc.MainList;
            for (int i = 0; i <= ML.Count - 1; i++)
            {
                mBase = ML.GetItems(i);
                m_who = mBase.Who();
                if (m_who == 0)
                {
                    mTFS = (TAlternativeParserItemTFS)(mBase);
                    TPredicateItemTFS iTfs = new TPredicateItemTFS();
                    iTfs.Assign(mTFS);
                    ABig.AddItem(iTfs);
                    for (int j = 0; j <= iTfs.TFECount - 1; j++)
                    {
                        mTFE = iTfs.GetTFEItems(j);
                        if (mTFE.RfcTFE.Big != null)
                        {
                            TPredicateItemBig iBig = NewBig(mTFE.RfcTFE.Big);
                            mTFE.Big = iBig;
                            AStack.InsertToFirst(iBig);
                        }
                    }
                }
                if (m_who == 1)
                {
                    mBig = (TAlternativeParserItemBig)(mBase);
                    TPredicateItemBig iBig = NewBig(mBig);
                    ABig.AddItem(iBig);
                    AStack.InsertToFirst(iBig);
                }
            }

            for (int i = 0; i <= mRfc.CountBig - 1; i++)
            {
                mBig = mRfc.GetItemsBig(i);
                TPredicateItemBig iBig = NewBig(mBig);
                ABig.AddItem(iBig);
                AStack.InsertToFirst(iBig);
            }
        }
Example #3
0
        public void GetAllFirstBigsNoCheck(TDynamicArray AMass)
        {
            TAlternativeParserItemBig  mTemp;
            TAlternativeParserItemBase mBase;
            TAlternativeParserItemTFS  mTfs;
            TAlternativeParserItemTFE  mTfe;
            int i, m_who;

            for (i = 0; i <= MainList.Count - 1; i++)
            {
                mBase = MainList.GetItems(i);
                m_who = mBase.Who();
                if (m_who == 1)
                {
                    mTemp = (TAlternativeParserItemBig)(mBase);
                    mTemp.MainTreeList = MainTreeList;
                    if (!mTemp.Check)
                    {
                        AMass.InsertToFirst(mTemp);
                    }
                }
                if (m_who == 0)
                {
                    mTfs = (TAlternativeParserItemTFS)(mBase);
                    for (int j = 0; j <= mTfs.TFECount - 1; j++)
                    {
                        mTfe = mTfs.GetTFEItems(j);
                        if (mTfe.Big != null && !mTfe.Big.Check)
                        {
                            AMass.InsertToFirst(mTfe.Big);
                        }
                    }
                }
            }
            for (i = 0; i <= CountBig - 1; i++)
            {
                mTemp = GetItemsBig(i);
                mTemp.MainTreeList = MainTreeList;
                if (!mTemp.Check)
                {
                    AMass.InsertToFirst(mTemp);
                }
                if (mTemp.Cross)
                {
                    mTemp.GetAllFirstBigsNoCheck(AMass);
                }
            }
        }
Example #4
0
        public void Init(ref TPredicateItemBig AHead, ref TPredicateTree APredicateTree)
        {
            string             SC;
            bool               pass;
            TPredicateItemBase Base, NC;

            f_PrStruct         = "";
            f_PrRab            = "";
            f_PrControlRab     = "";
            f_PrControlFunc    = "";
            f_PrCheckCondition = "";
            TDynamicArray m_Stack = new TDynamicArray();

            m_Stack.InsertToFirst(AHead);
            Base = (TPredicateItemBase)(m_Stack.Pop());
            while (Base != null)
            {
                NC = DoParseItem(ref Base, ref m_Stack);
                if (NC != null)
                {
                    f_BTree.insert(NC);
                }
                Base = (TPredicateItemBase)(m_Stack.Pop());
            }
            m_Stack = null;


            SharedConst.lcList.clear();
            f_BTree.inorder(acp);
            SharedConst.lcList.first();
            for (int i = 0; i <= SharedConst.lcList.length() - 1; i++)
            {
                //      TGlsListNode tmpNode = (TGlsListNode)SharedConst.lcList.val();
                //          TPredicateItemTFS tmpPredicateItem = (TPredicateItemTFS)(tmpNode.Val);
                //           TPredicateItemPWork
                Base = (TPredicateItemBase)(SharedConst.lcList.val());
                f_Item.Make(Base, Base.EnvelopeBIG);
                SC = f_Item.OutString;
                if (SC.Length > 0)
                {
                    f_PrStruct = f_PrStruct + SC + "\r\n";
                    MakeElement(Base);
                    if (APredicateTree != null)
                    {
                        AddElementToTree(APredicateTree);
                    }
                }
                //  MakeElement(Base);
                //  f_Tran.AddGTItem(f_Item);
                SharedConst.lcList.next();
            }

            bool acp(object A)
            {
                SharedConst.lcList.append(A);
                return(true);
            }

            // f_TextRecalc = f_Tran.Make();
        }
Example #5
0
        void PushTFS(TPredicateItemTFS ATFS, ref TDynamicArray AStack)
        {
            int m_type = ATFS.TFS.BaseWorkShape.TypeShape;

            if ((m_type != 1) || ((m_type == 1) && (ATFS.EnvelopeBIG != null)))
            {
                AStack.InsertToFirst(ATFS);
            }
            for (int i = 0; i <= ATFS.TFECount - 1; i++)
            {
                if (ATFS.GetTFEItems(i).Big != null)
                {
                    AStack.InsertToFirst(ATFS.GetTFEItems(i).Big);
                }
            }
        }
Example #6
0
        void DoSetIDItemTFS(TPredicateItemBase ABase, TDynamicArray AStack)
        {
            int m_type;
            TPredicateItemPWork m_PW;

            if (ABase != null)
            {
                m_type = ABase.Who();
                if (m_type == 0)
                {
                    PushTFS((TPredicateItemTFS)(ABase), AStack);
                }

                if (m_type == 1)
                {
                    AStack.InsertToFirst(ABase);
                }
                if (m_type == 2)
                {
                    m_PW = (TPredicateItemPWork)(ABase);
                    //1
                    m_type = m_PW.Item1.Who();
                    if (m_type == 0)
                    {
                        PushTFS((TPredicateItemTFS)(m_PW.Item1), AStack);
                    }

                    if (m_type == 1)
                    {
                        AStack.InsertToFirst(m_PW.Item1);
                    }

                    //2
                    m_type = m_PW.Item2.Who();
                    if (m_type == 0)
                    {
                        PushTFS((TPredicateItemTFS)(m_PW.Item2), AStack);
                    }
                    if (m_type == 1)
                    {
                        AStack.InsertToFirst(m_PW.Item2);
                    }
                }
            }
        }
Example #7
0
 void PushTFS(TPredicateItemTFS ATFS, TDynamicArray AStack)
 {
     for (int i = 0; i <= ATFS.TFECount - 1; i++)
     {
         if (ATFS.GetTFEItems(i).Big != null)
         {
             AStack.InsertToFirst(ATFS.GetTFEItems(i).Big);
         }
     }
 }
Example #8
0
 void PushBig(TPredicateItemBig ABig, ref TDynamicArray AStack)
 {
     if (ABig.Envelope)
     {
         TPredicateItemBase B = ABig.GetItems(0);
         B.EnvelopeBIG = ABig;
         int m_who = B.Who();
         if ((m_who == 2) || (m_who == 1))
         {
             AStack.InsertToFirst(B);
         }
         if (m_who == 0)
         {
             PushTFS((TPredicateItemTFS)(B), ref AStack);
         }
     }
     else
     {
         AStack.InsertToFirst(ABig);
     }
 }
Example #9
0
 public static void CopyDynamicArray(TDynamicArray ASource, TDynamicArray ADest, bool AInsertToFirst)
 {
     for (int i = 0; i <= ASource.Count - 1; i++)
     {
         if (AInsertToFirst)
         {
             ADest.InsertToFirst(ASource.GetItems(i));
         }
         else
         {
             ADest.Append(ASource.GetItems(i));
         }
     }
 }
Example #10
0
        void DoSetID()
        {
            TPredicateItemBig Big;

            f_NGen.InitNum();
            TDynamicArray m_Stack = new TDynamicArray();

            m_Stack.InsertToFirst(f_PredicateStart);
            Big = (TPredicateItemBig)(m_Stack.Pop());
            while (Big != null)
            {
                DoSetIDItem(Big, m_Stack);
                Big = (TPredicateItemBig)(m_Stack.Pop());
            }
            m_Stack = null;
        }
Example #11
0
        void DoProcess()
        {
            TPredicateItemBig Big;

            f_TryPath = true;
            TDynamicArray m_Stack = new TDynamicArray();

            m_Stack.InsertToFirst(f_PredicateStart);
            Big = (TPredicateItemBig)(m_Stack.Pop());
            while (Big != null)
            {
                DoProcessItem(Big, m_Stack);
                if (!f_TryPath)
                {
                    break;
                }
                Big = (TPredicateItemBig)(m_Stack.Pop());
            }
            m_Stack = null;
        }
Example #12
0
        /*        void DoMakeAlternative();*/
        void DoParse(ref TMainTreeList AMainTree)
        {
            TAlternativeParserItemBig  mBig, mTemp;
            TAlternativeParserItemBase mBase;

            CreateHead();
            f_Head.MainTreeList = AMainTree;
            f_Head.FillBasisAlternateTreeList(f_Head.MainTreeList.MainAlternative);
            TDynamicArray m_Stack = new TDynamicArray();

            m_Stack.InsertToFirst(f_Head);
            mBig = (TAlternativeParserItemBig)(m_Stack.Pop());
            while (mBig != null)
            {
                if (CheckEnlarge(mBig))
                {
                    MakeBig(ref mBig, f_Head == mBig);
                }
                mBig.Check = true;
                mBig.GetAllFirstBigsNoCheck(m_Stack);
                mBig = (TAlternativeParserItemBig)(m_Stack.Pop());
            }
            m_Stack = null;
        }
Example #13
0
 void PushPWork(TPredicateItemPWork APWork, ref TDynamicArray AStack)
 {
     AStack.InsertToFirst(APWork);
 }
Example #14
0
        void DoProcessItem(TPredicateItemBig AHead, TDynamicArray AStack)
        {
            int m_type, m_cnt, m_idx;
            TPredicateItemBase  m_Base;
            TPredicateItemBase  m_BaseItem1, m_BaseItem2;
            TPredicateItemPWork m_PWork, m_PW;
            TPredicateItemBig   m_Big;
            TPredicateItemTFS   m_Tfs;
            TPredicateItemTFE   m_Tfe;
            TDynamicArray       m_D     = new TDynamicArray();
            TDynamicArray       m_DTail = new TDynamicArray();
            TDynamicArray       m_DLN   = new TDynamicArray();

            m_cnt = AHead.Count;
            if (m_cnt == 1)
            {
                m_Base = AHead.GetItems(0);
                DoProcessItemTFS(m_Base, AStack);
                if (m_Base.Who() == 1)
                {
                    ((TPredicateItemBig)(m_Base)).Print = true;
                }

                ApplyStyle(AHead, m_Base);
            }
            if (m_cnt > 1)
            {
                for (int i = 0; i <= m_cnt - 1; i++)
                {
                    m_Base = AHead.GetItems(i);
                    m_type = m_Base.Who();
                    if (m_type == 1)
                    {
                        m_Big = (TPredicateItemBig)(m_Base);
                        if (m_Big.NumAlt > 0 || m_Big.Rfc.Cross)
                        {
                            m_DTail.Append(m_Big);
                            m_Big.Print = true;
                        }
                        else
                        {
                            m_DLN.Append(m_Base);
                            // m_Big.Print = m_Big.Rfc.CrossMain;
                        }
                    }
                    else
                    {
                        m_DLN.Append(m_Base);
                    }
                }
                if (m_DLN.Count == 1)
                {
                    m_Base = (TPredicateItemBase)(m_DLN.GetItems(0));
                    DoProcessItemTFS(m_Base, AStack);
                    ApplyStyle(AHead, m_Base);
                }
                else
                if (m_DLN.Count > 1)
                {
                    ApplyStyle(AHead, m_DLN);
                    m_BaseItem1 = (TPredicateItemBase)(m_DLN.GetItems(0));
                    m_BaseItem2 = (TPredicateItemBase)(m_DLN.GetItems(1));
                    DoProcessItemTFS(m_BaseItem1, AStack);
                    DoProcessItemTFS(m_BaseItem2, AStack);
                    for (int i = 2; i <= m_DLN.Count - 1; i++)
                    {
                        m_D.Append(m_DLN.GetItems(i));
                    }

                    AHead.DeleteItemToList(m_BaseItem1);
                    AHead.DeleteItemToList(m_BaseItem2);


                    m_BaseItem1 = EnvelopeToBig(m_BaseItem1);
                    m_BaseItem2 = EnvelopeToBig(m_BaseItem2);

                    m_PWork       = new TPredicateItemPWork();
                    m_PWork.Item1 = m_BaseItem1;
                    m_PWork.Item2 = m_BaseItem2;
                    SwapNumAlt(m_PWork, m_BaseItem1);



                    while (m_D.Count >= 1)
                    {
                        m_Big = (TPredicateItemBig)(EnvelopeToBig(m_PWork));

                        m_BaseItem1 = m_Big;
                        m_BaseItem2 = (TPredicateItemBase)(m_D.GetItems(0));
                        DoProcessItemTFS(m_BaseItem2, AStack);
                        AHead.DeleteItemToList(m_BaseItem2);

                        m_PW = new TPredicateItemPWork();
                        //m_PW.Envelope = true;
                        m_PW.Item1 = m_BaseItem1;
                        m_PW.Item2 = EnvelopeToBig(m_BaseItem2);
                        SwapNumAlt(m_PW, m_Big);
                        m_D.Delete(m_BaseItem2);
                        m_PWork = m_PW;
                    }

                    AHead.AddItem(m_PWork);
                }

                for (int i = 0; i <= m_DTail.Count - 1; i++)
                {
                    m_Base = (TPredicateItemBase)(m_DTail.GetItems(i));
                    AStack.InsertToFirst(m_Base);
                }

                m_DTail = null;
                m_DLN   = null;
                m_D     = null;
            }
        }