Changeset 40 in dev for BasicCompiler32/Compile_CallProc.cpp

Timestamp:

Jan 28, 2007, 3:48:22 AM (18 years ago)

Author:

dai_9181

Message:

ByRef修飾子を関数戻り値とDimステートメントで指定可能にした。

File:

• BasicCompiler32/Compile_CallProc.cpp (modified) (2 diffs)

BasicCompiler32/Compile_CallProc.cpp

@@ -337 +337 @@
     }
 
-    if(psi->ReturnType==DEF_OBJECT){
+    if(psi->ReturnType==DEF_OBJECT && psi->isReturnRef == false ){
         //_System_ReturnObject（第一または第二パラメータのダミーを作成）
         sprintf(temporary+lstrlen(temporary),"%c%c0,",1,ESC_BYVAL);
@@ -375 +375 @@
 
 
-
-    if(psi->ReturnType==DEF_OBJECT){
+    if(psi->ReturnType==DEF_OBJECT && psi->isReturnRef == false){
         //////////////////////////////////////////////////////
         // 戻り値にオブジェクト インスタンスを持つ場合