Changeset 140 in dev for BasicCompiler32/Compile_ProcOp.cpp

Timestamp:

Jun 15, 2007, 4:00:25 AM (17 years ago)

Author:

dai_9181

Message:

traceログ機能を搭載
動的メンバをstl::vectorにまとめた
シンボルをクラス化した

File:

• BasicCompiler32/Compile_ProcOp.cpp (modified) (2 diffs)

BasicCompiler32/Compile_ProcOp.cpp

@@ -514 +514 @@
             }
 
-            //新しいオブジェクト領域は0で初期化されているため、Nothingを明示的に代入する必要はない
-/*
-            //実体クラスを持つメンバのコンストラクタ（引数有りを除く）を呼び出す
-            for(i3=0;i3<pobj_CompilingClass->iMemberNum;i3++){
-                CMember *pMember = pobj_CompilingClass->ppobj_Member[i3];
-                if(pMember->IsObject()){
-                    // オブジェクトメンバを発見したとき
-
-                    sprintf(temporary, "This.%s=Nothing",
-                        pMember->name );
-                    OpcodeCalc( temporary );
-                }
-            }
-*/
-
             //仮想関数テーブルを初期化
             if(pobj_CompilingClass->vtbl_num&&
@@ -608 +593 @@
                 }
             }
-
-            //実体クラスを持つメンバのデストラクタ呼び出しはGCに任せる
-            /*
-            //※コンストラクタと逆順序で呼び出す
-            int offset;
-            int MemberTypeSize;
-            int MemberObjectNum;
-            offset=GetTypeSize(DEF_OBJECT,(LONG_PTR)pobj_CompilingClass);
-            for(i3=pobj_CompilingClass->iMemberNum-1;i3>=0;i3--){
-                CMember *pMember = pobj_CompilingClass->ppobj_Member[i3];
-
-                MemberTypeSize=
-                    GetTypeSize(pMember->TypeInfo.type,
-                        pMember->TypeInfo.u.lpIndex);
-
-                MemberObjectNum=
-                    JumpSubScripts(pMember->SubScripts);
-
-                offset-=MemberTypeSize*MemberObjectNum;
-
-                if(pMember->TypeInfo.type==DEF_OBJECT){
-                    CMethod *method = pMember->TypeInfo.u.pobj_Class->GetDestructorMethod();
-                    if( method ){
-                        for(i4=MemberObjectNum-1;i4>=0;i4--){
-                            //Thisポインタをecxにコピー
-                            SetThisPtrToReg(REG_ECX);
-
-                            //add ecx,offset
-                            OpBuffer[obp++]=(char)0x81;
-                            OpBuffer[obp++]=(char)0xC1;
-                            *((long *)(OpBuffer+obp))=offset+i4*MemberTypeSize;
-                            obp+=sizeof(long);
-
-                            //push ecx
-                            op_push(REG_ECX);
-
-                            //call destructor
-                            op_call( method->pUserProc );
-                        }
-                    }
-                }
-            }*/
         }
     }