Changeset 370 in dev for trunk/abdev/BasicCompiler32/Compile_CallProc.cpp

Timestamp:

Nov 15, 2007, 3:18:41 AM (16 years ago)

Author:

dai_9181

Message:

COM修飾子に対応。COMインターフェイスを呼び出せるようにした

File:

• trunk/abdev/BasicCompiler32/Compile_CallProc.cpp (modified) (3 diffs)

trunk/abdev/BasicCompiler32/Compile_CallProc.cpp

@@ -326 +326 @@
         if( pobj_c->IsInterface() )
         {
-            // インターフェイスメソッド呼び出し
+            // インターフェイス メソッド呼び出し
 
             int offset_vtbl = compiler.GetObjectModule().meta.GetClasses().GetInterfaceInfoClassPtr()->GetMemberOffset( "__vtbl" );
@@ -349 +349 @@
                 SetError();
             }
+        }
+        else if( pobj_c->IsComInterface() )
+        {
+            // COMインターフェイス メソッド呼び出し
+
+            //仮想関数（オブジェクトメソッド）呼び出し
+            // pObj -> vtbl1 -> func1
+            //               -> func2
+            //               -> func3
+
+            int vtblMasterListIndex;
+            pobj_c->GetVtblMasterListIndexAndVtblIndex( pUserProc, vtblMasterListIndex, vtblIndex );
+
+            // vtblのポインタを取得
+            //mov edx,dword ptr[ecx]
+            compiler.codeGenerator.op_mov_RM( sizeof(long), REG_EDX, REG_ECX, 0, MOD_BASE );
         }
         else
@@ -364 +380 @@
 
             // vtblマスターリストのポインタを取得
-            //mov edx,dword ptr[ecx]
-            compiler.codeGenerator.op_mov_RM( sizeof(long), REG_EDX, REG_ECX, 0, MOD_BASE );
+            //mov edx,dword ptr[ecx+sizeof(com_vtbl)]
+            compiler.codeGenerator.op_mov_RM( sizeof(long), REG_EDX, REG_ECX, PTR_SIZE, MOD_BASE_DISP8 );
             
             // vtblのポインタを取得