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

Timestamp:

Nov 2, 2007, 2:53:56 AM (17 years ago)

Author:

dai_9181

Message:

静的領域に初期オブジェクトを配置可能にした

File:

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

trunk/abdev/BasicCompiler_Common/src/Class.cpp

@@ -1294 +1294 @@
         compiler.GetNamespaceSupporter().GetLivingNamespaceScopes() = objClass.GetNamespaceScopes();
 
+        DWORD dwFlags = 0;
+        if( objClass.GetName() == "_System_TypeBase" )
+        {
+            // _System_TypeBaseクラスはグローバル、スタティック領域を初期化するためのクラスなのでここでの初期化は除外する
+            dwFlags |= DIMFLAG_NONCALL_CONSTRACTOR;
+        }
+
         int i=0;
         BOOST_FOREACH( CMember *member, objClass.GetStaticMembers() ){
@@ -1304 +1311 @@
                 member->GetInitializeExpression().c_str(),
                 member->GetConstructParameter().c_str(),
-                0);
+                dwFlags);
 
             i++;
@@ -1892 +1899 @@
             // 未使用のクラスは無視する
             continue;
-        }
+        }   
 
         char referenceOffsetsBuffer[1024] = "";
@@ -1911 +1918 @@
 
         sprintf( temporary
-            , "Add(%c%c_System_TypeForClass(\"%s\",\"%s\",[%s],%d))"
+            , "Add(%c%c_System_TypeForClass[strNamespace=\"%s\",name=\"%s\",fullName=\"%s\",referenceOffsets=[%s],numOfReference=%d])"
             , 1
-            , ESC_NEW
-            , ""                            // 名前空間 (TODO: 実装)
-            , objClass.GetName().c_str()    // クラス名
-            , referenceOffsetsBuffer        // 参照メンバオフセット配列
-            , numOfReference                // 参照メンバの個数
+            , ESC_SYSTEM_STATIC_NEW
+            , objClass.GetNamespaceScopes().ToString().c_str()      // 名前空間
+            , objClass.GetName().c_str()                            // クラス名
+            , objClass.GetFullName().c_str()                        // フルネーム
+            , referenceOffsetsBuffer                                // 参照メンバオフセット配列
+            , numOfReference                                        // 参照メンバの個数
             );
 
         // コンパイル
         ChangeOpcode( temporary );
-    }
-
-
+
+        objClass.SetTypeInfoDataTableOffset(
+            compiler.GetObjectModule().dataTable.GetLastMadeConstObjectDataTableOffset()
+        );
+    }
+}
+void Classes::Compile_System_InitializeUserTypesForBaseType()
+{
+    extern int cp;
+    cp = -1;
     ////////////////////////////////////////////////////////////////////
     // 基底クラスを登録
     ////////////////////////////////////////////////////////////////////
 
+    char temporary[VN_SIZE];
     sprintf(temporary, "%c%ctempType=Nothing%c%cTypeBaseImpl"
         , HIBYTE( COM_DIM )
@@ -1950 +1966 @@
         if( objClass.HasSuperClass() ){
             sprintf( temporary
-                , "tempType=Search(\"%s\",\"%s\")"
-                , ""                            // 名前空間 (TODO: 実装)
-                , objClass.GetName().c_str()    // クラス名
+                , "tempType=Search(\"%s\")"
+                , objClass.GetFullName().c_str()
                 );
 
@@ -1959 +1974 @@
 
             sprintf( temporary
-                , "tempType.SetBaseType(Search(\"%s\",\"%s\"))"
-                , ""                                // 名前空間 (TODO: 実装)
-                , objClass.GetSuperClass().GetName().c_str()    // 基底クラス名
+                , "tempType.SetBaseType(Search(\"%s\"))"
+                , objClass.GetSuperClass().GetFullName().c_str()
                 );