Changeset 73 in dev for BasicCompiler64/Compile_Statement.cpp

Timestamp:

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

Author:

dai_9181

Message:

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

File:

• BasicCompiler64/Compile_Statement.cpp (modified) (10 diffs)

BasicCompiler64/Compile_Statement.cpp

@@ -5 +5 @@
     int i,i2;
     char buffer[8192];
-    SUBINFO *psi;
+    SubInfo *psi;
 
     for(i=0;;i++){
@@ -44 +44 @@
 
         //GetSubHash内でエラー提示が行われた場合
-        if(psi==(SUBINFO *)-1) return;
+        if(psi==(SubInfo *)-1) return;
 
         if(psi==0){
@@ -54 +54 @@
 
             //GetSubHash内でエラー提示が行われた場合
-            if(psi==(SUBINFO *)-1) return;
+            if(psi==(SubInfo *)-1) return;
         }
 
@@ -722 +722 @@
                     pobj_c=(CClass *)lpIndex;
 
-                    std::vector<SUBINFO *> subs;
+                    std::vector<SubInfo *> subs;
                     pobj_c->EnumMethod( CALC_EQUAL, subs );
                     if( subs.size() == 0 ){
@@ -739 +739 @@
 
                     //オーバーロードを解決
-                    SUBINFO *psi;
+                    SubInfo *psi;
                     psi=OverloadSolution("==",subs,ppi,iParmNum,NULL);
                     HeapDefaultFree(ppi);
@@ -883 +883 @@
 
     //call _System_GetEip
-    extern SUBINFO *pSub_System_GetEip;
+    extern SubInfo *pSub_System_GetEip;
     op_call(pSub_System_GetEip);
 
@@ -945 +945 @@
         //戻り値をセット
         if(Parameter[0]){
-            extern SUBINFO *pCompilingSubInfo;
+            extern SubInfo *pCompilingSubInfo;
             char *temp;
             if(pCompilingSubInfo->name[0]==1&&pCompilingSubInfo->name[1]==ESC_OPERATOR)
@@ -1075 +1075 @@
     OpcodeCalc(temp2);
 
-    SUBINFO *psi;
+    SubInfo *psi;
     if(bFile) psi=GetSubHash("INPUT_FromFile");
     else psi=GetSubHash("INPUT_FromPrompt");
@@ -1177 +1177 @@
     OpcodeCalc(temp2);
 
-    SUBINFO *psi;
+    SubInfo *psi;
     if(bFile) psi=GetSubHash("PRINTUSING_ToFile");
     else psi=GetSubHash("PRINTUSING_ToPrompt");
@@ -1281 +1281 @@
     if(sw) lstrcat(buffer,"+Ex\"\\r\\n\"");
 
-    SUBINFO *psi;
+    SubInfo *psi;
     if(bFile) psi=GetSubHash("PRINT_ToFile");
     else psi=GetSubHash("PRINT_ToPrompt");