Changeset 51 in dev for BasicCompiler64/OperatorProc.cpp

Timestamp:

Feb 10, 2007, 8:30:19 PM (18 years ago)

Author:

dai_9181

Message:

ppobj_Member及びppobj_StaticMemberを廃止し、vectorに統一した（methods及びstaticMethods）。

File:

• BasicCompiler64/OperatorProc.cpp (modified) (2 diffs)

BasicCompiler64/OperatorProc.cpp

@@ -10 +10 @@
     ////////////////////////////////////////////////
 
-    if(pobj_c->DestructorMemberSubIndex!=-1){
+    CMethod *method = pobj_c->GetDestructorMethod();
+    if( method ){
         //mov rcx,reg
         op_mov_RR(REG_RCX,reg);
 
         //call DestructorProcAddr
-        op_call(pobj_c->ppobj_Method[pobj_c->DestructorMemberSubIndex]->psi);
+        op_call( method->psi );
     }
 
@@ -294 +295 @@
 
         if(bCalcUseHeap){
-            /*
-            //未解放のインスタンスが存在する場合
-            //※専用のローカル変数を用意し、メモリリークを回避
-            char temporary[VN_SIZE],temp2[VN_SIZE];
-
-
-            ////////////////////////////////
-            // 一時オブジェクト変数を用意
-            ////////////////////////////////
-            char szTempVarName[255];
-            GetTypeName(CalcType,lpCalcIndex,temp2);
-            sprintf(szTempVarName,"_System_strDummy%d",obp);
-            wsprintf(temporary,"%s%c%c%s",szTempVarName,1,ESC_AS,temp2);
-            InsertDimStatement_ToProcHead(temporary);
-
-            RELATIVE_VAR VarRelativeVar;
-            int VarType;
-            LONG_PTR lpVarIndex;
-            if(!GetVarOffsetReadOnly(
-                szTempVarName,
-                &VarType,
-                &VarRelativeVar,
-                &lpVarIndex)) return;
-
-
-            CClass *pobj_c;
-            pobj_c=(CClass *)lpCalcIndex;
-            if(pobj_c->DestructorMemberSubIndex!=-1){
-
-                //////////////////////////////////////////////////////
-                /////    レジスタ資源のバックアップ
-                {   BACKUP_REGISTER_RESOURCE
-                //////////////////////////////////////////////////////
-
-                    //ループの場合、古い一時オブジェクトのデストラクタを呼ぶ
-
-                    //rcxに変数アドレスをコピー
-                    SetVarPtrToReg(REG_RCX,&VarRelativeVar);
-
-                    //call destructor
-                    OpBuffer[obp++]=(char)0xE8;
-                    pobj_SubAddrSchedule->add(pobj_c->ppobj_Method[pobj_c->DestructorMemberSubIndex]->psi,1);
-                    obp+=sizeof(long);
-
-                /////////////////////////////////////////////
-                //////   レジスタ資源を復元
-                    RESTORE_REGISTER_RESOURCE
-                }////////////////////////////////////////////
-            }
-
-            //mov r15,reg
-            op_mov_RR(REG_R15,reg);
-
-
-            int object_size;
-            object_size=GetSizeOfClass((CClass *)lpVarIndex);
-
-            //mov rcx,object_size
-            op_mov_RV(sizeof(_int64),REG_RCX,object_size);
-
-            //rdiに変数アドレスをコピー
-            SetVarPtrToReg(REG_RDI,&VarRelativeVar);
-
-            //mov rsi,reg
-            op_mov_RR(REG_RSI,reg);
-
-            //mov r14,rdi
-            op_mov_RR(REG_R14,REG_RDI);
-            pobj_BlockReg->lock(REG_R14);
-
-            //rep movs byte ptr[rdi],byte ptr[rsi]
-            op_rep_movs(sizeof(BYTE));
-
-            //////////////////////////////////////////////////////
-            /////    レジスタ資源のバックアップ
-            {   BACKUP_REGISTER_RESOURCE
-            //////////////////////////////////////////////////////
-
-                //mov rcx,r15
-                op_mov_RR(REG_RCX,REG_R15);
-
-                //call free
-                extern SUBINFO *pSub_free;
-                OpBuffer[obp++]=(char)0xE8;
-                pobj_SubAddrSchedule->add(pSub_free,1);
-                obp+=sizeof(long);
-
-            /////////////////////////////////////////////
-            //////   レジスタ資源を復元
-                RESTORE_REGISTER_RESOURCE
-            }////////////////////////////////////////////
-
-
-            //mov reg,r14
-            op_mov_RR(reg,REG_R14);
-
-            pobj_BlockReg->unlock(REG_R14);
-            */
-
             //未解放のインスタンスが存在する旨を示す警告
             SetError(-105,NULL,cp);
-
         }