Changeset 73 in dev for BasicCompiler_Common/DebugMiddleFile.cpp

Timestamp:

Mar 16, 2007, 11:07:14 PM (18 years ago)

Author:

dai_9181

Message:

Parameterクラスを適用。32bit側は動くようになったので、64bitのほうを調整する。

File:

• BasicCompiler_Common/DebugMiddleFile.cpp (modified) (7 diffs)

BasicCompiler_Common/DebugMiddleFile.cpp

@@ -213 +213 @@
 
     //プロシージャ情報
-    extern SUBINFO **ppSubHash;
+    extern SubInfo **ppSubHash;
     extern int SubNum;
-    SUBINFO *psi;
+    SubInfo *psi;
     *(long *)(buffer+i2)=SubNum;
     i2+=sizeof(long);
@@ -585 +585 @@
 
     //プロシージャ情報
-    SUBINFO *psi;
+    SubInfo *psi;
     SubNum=*(long *)(buffer+i2);
     i2+=sizeof(long);
-    ppSubHash=(SUBINFO **)HeapAlloc(hHeap,HEAP_ZERO_MEMORY,MAX_HASH*sizeof(SUBINFO *));
+    ppSubHash=(SubInfo **)HeapAlloc(hHeap,HEAP_ZERO_MEMORY,MAX_HASH*sizeof(SubInfo *));
     for(i3=0;i3<SubNum;i3++){
-        psi=(SUBINFO *)HeapAlloc(hHeap,0,sizeof(SUBINFO));
+        psi = new SubInfo();
         psi->pNextData=0;
 
@@ -618 +618 @@
         i2+=sizeof(long);
 
-        psi->ParmNum=0;
-        psi->pParmInfo=0;
-        psi->RealParmNum=0;
-        psi->pRealParmInfo=0;
         psi->bCompile=1;
 
@@ -677 +673 @@
         i4=hash_default(psi->name);
 
-        SUBINFO *psi2;
+        SubInfo *psi2;
         if(ppSubHash[i4]){
             psi2=ppSubHash[i4];
@@ -804 +800 @@
 
 
-    extern SUBINFO **ppSubHash;
+    extern SubInfo **ppSubHash;
     ppSubHash=this->ppSubHash;
     pSub_DebugSys_EndProc=GetSubHash("_DebugSys_EndProc");
@@ -973 +969 @@
     extern char **ppMacroNames;
     ppMacroNames=0;
-    extern SUBINFO **ppSubHash;
+    extern SubInfo **ppSubHash;
     extern int SubNum;
     ppSubHash=this->ppSubHash;
     SubNum=this->SubNum;
 
-    extern SUBINFO *pSub_DebugSys_EndProc;
+    extern SubInfo *pSub_DebugSys_EndProc;
     pSub_DebugSys_EndProc=this->pSub_DebugSys_EndProc;
 
@@ -998 +994 @@
 
     //ローカル変数に関する情報を解放
-    SUBINFO *psi;
+    SubInfo *psi;
     for(i2=0;i2<MAX_HASH;i2++){
         psi=ppSubHash[i2];