Changeset 123 in dev for BasicCompiler32

Timestamp:

May 14, 2007, 1:08:14 AM (18 years ago)

Author:

dai_9181

Message:

オブジェクトの先頭バッファのサイズを4ポインタ分に拡張した（偶数個数なところがキモ）。

File:

• BasicCompiler32/Compile_Object.cpp (modified) (7 diffs)

BasicCompiler32/Compile_Object.cpp

@@ -134 +134 @@
         obp+=sizeof(long);
 
-        //add eax,sizeof(DWORD)*2
+        //add eax,OBJECT_HEAD_SIZE
         OpBuffer[obp++]=(char)0x05;
-        *((long *)(OpBuffer+obp))=sizeof(DWORD)*3;
+        *((long *)(OpBuffer+obp))=OBJECT_HEAD_SIZE;
         obp+=sizeof(long);
 
@@ -150 +150 @@
         obp+=sizeof(long);
 
-        //push size
+        //push size + OBJECT_HEAD_SIZE
         OpBuffer[obp++]=(char)0x68;
-        *((long *)(OpBuffer+obp))=typeSize+sizeof(DWORD)*3;
+        *((long *)(OpBuffer+obp))=typeSize + OBJECT_HEAD_SIZE;
         obp+=sizeof(long);
     }
@@ -176 +176 @@
     /*
     確保されたヒープ領域のポインタ（callocの戻り値eax）をpPtrとすると、
-    pPtr-=sizeof(DWORD)*3
     pPtr[0]=オブジェクトの個数
     pPtr[1]=オブジェクトのサイズ
     pPtr[2]=デストラクタの関数ポインタ
+    pPtr[3]=reserve
     */
 
@@ -198 +198 @@
     obp+=sizeof(long);
 
-    //mov dword ptr[eax],ecx
+    //mov dword ptr[eax],ecx（オブジェクトのサイズ）
     OpBuffer[obp++]=(char)0x89;
     OpBuffer[obp++]=(char)0x08;
@@ -217 +217 @@
     obp+=sizeof(long);
 
-    //mov dword ptr[eax],ecx
+    //mov dword ptr[eax],ecx（デストラクタの関数ポインタ）
     OpBuffer[obp++]=(char)0x89;
     OpBuffer[obp++]=(char)0x08;
 
+    //add eax,sizeof(DWORD)
+    OpBuffer[obp++]=(char)0x05;
+    *((long *)(OpBuffer+obp))=sizeof(DWORD);
+    obp+=sizeof(long);
+
+
+    // リザーブ領域
     //add eax,sizeof(DWORD)
     OpBuffer[obp++]=(char)0x05;
@@ -251 +258 @@
 
     //sub eax,sizeof(DWORD)*3
-    OpBuffer[obp++]=(char)0x83;
-    OpBuffer[obp++]=(char)0xE8;
-    OpBuffer[obp++]=(char)0x0C;
+    op_sub_RV8( REG_EAX, OBJECT_HEAD_SIZE );
 
     //push eax
@@ -283 +288 @@
     OpBuffer[obp++]=(char)0x10;
 
+    //add eax,sizeof(DWORD)
+    OpBuffer[obp++]=(char)0x05;
+    *((long *)(OpBuffer+obp))=sizeof(DWORD);
+    obp+=sizeof(long);
+
+
+    // リザーブ領域
     //add eax,sizeof(DWORD)
     OpBuffer[obp++]=(char)0x05;