Changeset 348 in dev for trunk/abdev/BasicCompiler_Common/src/Class.cpp

Timestamp:

Oct 12, 2007, 3:25:54 AM (17 years ago)

Author:

dai_9181

Message:

 

File:

• trunk/abdev/BasicCompiler_Common/src/Class.cpp (modified) (4 diffs)

trunk/abdev/BasicCompiler_Common/src/Class.cpp

@@ -817 +817 @@
 }
 
-int CClass::GetVtblMasterListIndex( const UserProc *pUserProc ) const
-{
-    int index = 0;
+void CClass::GetVtblMasterListIndexAndVtblIndex( const UserProc *pUserProc, int &vtblMasterListIndex, int &vtblIndex ) const
+{
+    vtblMasterListIndex = 0;
+
+    vtblIndex = 0;
     BOOST_FOREACH( const CMethod *pMethod, GetDynamicMethods() ){
         if( &pMethod->GetUserProc() == pUserProc )
         {
-            return index;
+            return;
+        }
+
+        if( pMethod->IsVirtual() )
+        {
+            vtblIndex++;
         }
     }
@@ -829 +836 @@
     BOOST_FOREACH( const ::Interface *pInterface, interfaces )
     {
-        index++;
-
+        vtblMasterListIndex++;
+
+        vtblIndex = 0;
         BOOST_FOREACH( const CMethod *pMethod, pInterface->GetDynamicMethods() ){
             if( &pMethod->GetUserProc() == pUserProc )
             {
-                return index;
+                return;
+            }
+
+            if( pMethod->IsVirtual() )
+            {
+                vtblIndex++;
             }
         }
@@ -840 +853 @@
 
     SetError();
-    return 0;
-}
-int CClass::GetFuncNumInVtbl( const UserProc *pUserProc ) const
-{
-    int n = 0;
-    BOOST_FOREACH( const CMethod *pMethod, GetDynamicMethods() ){
-        if( &pMethod->GetUserProc() == pUserProc ) break;
-        if( pMethod->IsVirtual() ) n++;
-    }
-    return n;
+    return;
 }
 long CClass::GetVtblMasterListOffset() const
@@ -1523 +1527 @@
             }
 
-            if( pobj_c->GetName() == "Object" || dwClassType == ESC_TYPE ){
+            if( pobj_c->GetName() == "Object"
+                || pobj_c->GetFullName() == "ActiveBasic.Core.InterfaceInfo"
+                || dwClassType == ESC_TYPE )
+            {
+                // 何も継承しない
+
                 if( &pobj_c->GetSuperClass() || pobj_c->GetVtblNum() )
                 {