Changeset 45 in dev for BasicCompiler64

Timestamp:

Feb 2, 2007, 2:58:14 AM (17 years ago)

Author:

dai_9181

Message:

・オーバーロードが解決できない場合のエラーが表示されないバグを修正。
・DLL関数のByRefパラメータに変数以外の数値を指定すると正常にコンパイルされないバグを修正。

Location:

BasicCompiler64

Files:

• CParameter.cpp (modified) (2 diffs)
• Compile_CallProc.cpp (modified) (2 diffs)

BasicCompiler64/CParameter.cpp

@@ -391 +391 @@
                 StackOffsetOfTempObject[i2] = pobj_sf->push(reg);
 
-                useTempParameters[i2] = true;
-                useTempObject = true;
-
-                types[i2].type = type;
-                types[i2].u.lpIndex = lpVarIndex;
+                bool result = CheckDifferentType(
+                    DummyTypeInfo.type,
+                    DummyTypeInfo.u.lpIndex,
+                    type,
+                    lpVarIndex,
+                    FuncName,
+                    i2);
+
+                if( result ){
+                    useTempParameters[i2] = true;
+                    useTempObject = true;
+
+                    types[i2].type = type;
+                    types[i2].u.lpIndex = lpVarIndex;
+                }
             }
         }
@@ -415 +425 @@
             //call destructor
             int i5 = types[i2].u.pobj_Class->DestructorMemberSubIndex;
-            op_call( types[i2].u.pobj_Class->ppobj_Method[i5]->psi );
+            if( i5 != -1 ){
+                op_call( types[i2].u.pobj_Class->ppobj_Method[i5]->psi );
+            }
 
             //メモリを解放する

BasicCompiler64/Compile_CallProc.cpp

@@ -546 +546 @@
     pobj_parameter->BackupParameter(pdi->ParmNum);
 
+    //一時オブジェクトを生成
+    pobj_parameter->NewTempParameters( pdi->name,pdi->pParmInfo,pdi->ParmNum,pdi->ParmNum );
+
     //レジスタ、スタックフレームにセット
     pobj_parameter->SetParameter(pdi->name,pdi->pParmInfo,pdi->ParmNum,pdi->ParmNum);
@@ -564 +567 @@
     }*/
 
+    //一時オブジェクトを破棄
+    pobj_parameter->DeleteTempParameters();
+
     //スタックフレームに存在する既存のパラメータを復元
     pobj_parameter->RestoreParameter(pdi->ParmNum);