Changeset 76 in dev for BasicCompiler32/MakePeHdr.cpp

Timestamp:

Mar 21, 2007, 9:26:56 PM (18 years ago)

Author:

dai_9181

Message:

TYPEINFO→Typeへのリファクタリングを実施。32bitが未完成。

File:

• BasicCompiler32/MakePeHdr.cpp (modified) (5 diffs)

BasicCompiler32/MakePeHdr.cpp

@@ -150 +150 @@
 
     //関数ポインタ情報を初期化
-    extern ProcPointer **ppProcPtrInfo;
+    extern ProcPointer **ppProcPointer;
     extern int ProcPtrInfoNum;
-    ppProcPtrInfo=(ProcPointer **)HeapAlloc(hHeap,0,1);
+    ppProcPointer=(ProcPointer **)HeapAlloc(hHeap,0,1);
     ProcPtrInfoNum=0;
 
@@ -309 +309 @@
 
 
+    /////////////////////////////////////////////////////////////////
+    // デバッグコンパイル用のログを生成する
+    /////////////////////////////////////////////////////////////////
+#ifdef _DEBUG
+    {
+        ofstream ofs("middle_code.txt");
+        ofs << basbuf << endl;
+        ofs.close();
+    }
+#endif
+
 
     //////////////////////
@@ -315 +326 @@
 
     cp=-1;
-    extern BOOL bCompilingGlobal;
-    bCompilingGlobal=1;
-    pobj_CompilingClass=0;
+    UserProc::CompileStartForGlobalArea();
 
     if(!bDll){
@@ -434 +443 @@
     // ローカル実行領域
     /////////////////////
-
-    bCompilingGlobal=0;
 
     //プロシージャをコンパイル開始
@@ -736 +743 @@
     //グローバル変数情報を扱う構造体も初期バッファの有無による配置を行う
     //（デバッグ情報で利用される）
-    extern int MaxGlobalVarNum;
-    extern VARIABLE *GlobalVar;
     extern int AllInitGlobalVarSize;
-    for(i=0;i<MaxGlobalVarNum;i++){
-        if(GlobalVar[i].offset&0x80000000){
-            GlobalVar[i].offset=(GlobalVar[i].offset&0x7FFFFFFF)+AllInitGlobalVarSize;
+    foreach( Variable *pVar, globalVars ){
+        if(pVar->offset&0x80000000){
+            pVar->offset=(pVar->offset&0x7FFFFFFF)+AllInitGlobalVarSize;
         }
     }