Changeset 100 in dev for BasicCompiler64

Timestamp:

Apr 24, 2007, 3:17:29 AM (18 years ago)

Author:

dai_9181

Message:

名前空間機能をグローバル関数に適用。

Location:

BasicCompiler64

Files:

• BasicCompiler.vcproj (modified) (1 diff)
• Compile_ProcOp.cpp (modified) (5 diffs)
• MakePeHdr.cpp (modified) (1 diff)

BasicCompiler64/BasicCompiler.vcproj

@@ -577 +577 @@
                     Name="Meta Parts"
                     >
+                    <File
+                        RelativePath="..\BasicCompiler_Common\include\Namespace.h"
+                        >
+                    </File>
                     <File
                         RelativePath="..\BasicCompiler_Common\Parameter.h"

BasicCompiler64/Compile_ProcOp.cpp

@@ -219 +219 @@
     extern char *basbuf;
     extern HANDLE hHeap;
-    extern UserProc **ppSubHash;
+    extern GlobalProc **ppSubHash;
     extern BOOL bDebugCompile;
     int i3,i4;
@@ -830 +830 @@
     temporary[0]=0;
     lstrcat( temporary, "------------------------------------------------------------------\n" );
-    sprintf( temporary + lstrlen(temporary), "【 %s のコード情報】\n", userProc.GetFullName().c_str() );
+    sprintf( temporary + lstrlen(temporary), "【 %s のコード情報】\n", userProc.GetName().c_str() );
     sprintf( temporary + lstrlen(temporary), "code size: %d bytes\n", userProc.GetCodeSize() );
     lstrcat( temporary, "------------------------------------------------------------------\n" );
@@ -837 +837 @@
 }
 void CompileLocal(){
-    extern UserProc **ppSubHash;
+    extern GlobalProc **ppSubHash;
     int i2;
-    UserProc *pUserProc;
 
     extern BOOL bDll;
     if(bDll){
         //DLLの場合はグローバル変数を初期化するための関数を一番初めにコンパイルする
-        pUserProc=GetSubHash("_System_InitDllGlobalVariables");
+        UserProc *pUserProc=GetSubHash("_System_InitDllGlobalVariables");
         if(pUserProc){
             CompileBufferInProcedure( *pUserProc );
@@ -865 +864 @@
 
 repeat:
+    GlobalProc *pGlobalProc;
     for(i2=0;i2<MAX_HASH;i2++){
-        pUserProc=ppSubHash[i2];
-        while(pUserProc){
-            CompileBufferInProcedure( *pUserProc );
-            pUserProc=pUserProc->pNextData;
+        pGlobalProc=ppSubHash[i2];
+        while(pGlobalProc){
+            CompileBufferInProcedure( *pGlobalProc );
+            pGlobalProc=pGlobalProc->pNextData;
         }
     }
@@ -885 +885 @@
         //プロシージャコンパイルによって、プロシージャコンパイルが必要になる場合
         for(i2=0;i2<MAX_HASH;i2++){
-            pUserProc=ppSubHash[i2];
-            while(pUserProc){
-                CompileBufferInProcedure( *pUserProc );
-                pUserProc=pUserProc->pNextData;
+            pGlobalProc=ppSubHash[i2];
+            while(pGlobalProc){
+                CompileBufferInProcedure( *pGlobalProc );
+                pGlobalProc=pGlobalProc->pNextData;
             }
         }

BasicCompiler64/MakePeHdr.cpp

@@ -531 +531 @@
         ExportNamesLength=lstrlen(lpExportNames)+1;
 
-        extern UserProc **ppSubHash;
-        UserProc *pUserProc,*psi2;
+        extern GlobalProc **ppSubHash;
+        GlobalProc *pUserProc,*psi2;
         while(1){
             //辞書順にサーチ