Changeset 20 in dev for BasicCompiler64/Compile_CallProc.cpp

Timestamp:

Dec 28, 2006, 5:24:48 AM (18 years ago)

Author:

dai_9181

Message:

参照型パラメータに関数の戻り値オブジェクトを指定した場合などの、一時オブジェクトの扱いを可能にした。
Dimで指定される初期値を見分けることで、As指定を省略できるようにした。

File:

• BasicCompiler64/Compile_CallProc.cpp (modified) (4 diffs)

BasicCompiler64/Compile_CallProc.cpp

@@ -180 +180 @@
     pobj_parameter->BackupParameter(pi->ParmNum);
 
+    //一時オブジェクトを生成
+    pobj_parameter->NewTempParameters( variable,pi->pParmInfo,pi->ParmNum,pi->ParmNum );
+
     //レジスタ、スタックフレームにセット
     pobj_parameter->SetParameter(variable,pi->pParmInfo,pi->ParmNum,pi->ParmNum);
@@ -200 +203 @@
     //レジスタのブロッキングを解除        ※パラメータセット時にロックされたレジスタ
     pobj_BlockReg->clear();
+
+    //一時オブジェクトを破棄
+    pobj_parameter->DeleteTempParameters();
 
     //スタックフレームに存在する既存のパラメータを復元
@@ -355 +361 @@
     pobj_parameter->BackupParameter(psi->RealParmNum);
 
+    //一時オブジェクトを生成
+    pobj_parameter->NewTempParameters( psi->name,psi->pRealParmInfo,psi->RealParmNum,psi->RealSecondParmNum );
+
     //レジスタ、スタックフレームにセット
     pobj_parameter->SetParameter(psi->name,psi->pRealParmInfo,psi->RealParmNum,psi->RealSecondParmNum);
@@ -490 +499 @@
     pobj_BlockReg->clear();
 
+    //一時オブジェクトを破棄
+    pobj_parameter->DeleteTempParameters();
+
     //スタックフレームに存在する既存のパラメータを復元
     pobj_parameter->RestoreParameter(psi->RealParmNum);