Changeset 45 in dev for BasicCompiler32/Compile_CallProc.cpp
- Timestamp:
- Feb 2, 2007, 2:58:14 AM (18 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
BasicCompiler32/Compile_CallProc.cpp
r40 r45 357 357 358 358 //エラーチェック 359 if( !pobj_parameter->ErrorCheck(psi->name,psi->pRealParmInfo,psi->RealParmNum,psi-> RealSecondParmNum) ){359 if( !pobj_parameter->ErrorCheck(psi->name,psi->pRealParmInfo,psi->RealParmNum,psi->SecondParmNum) ){ 360 360 //パラメータにエラーがあるときは処理を終える 361 361 return; … … 524 524 } 525 525 526 //一時オブジェクトを生成 527 pobj_parameter->NewTempParameters( pdi->name,pdi->pParmInfo,pdi->ParmNum,pdi->ParmNum ); 528 526 529 //レジスタ、スタックフレームにセット 527 530 int ParmSize; 528 531 ParmSize=pobj_parameter->SetParameter(pdi->name,pdi->pParmInfo,pdi->ParmNum,pdi->ParmNum); 529 530 //パラメータオブジェクトを破棄531 delete pobj_parameter;532 532 533 533 … … 545 545 } 546 546 547 //一時オブジェクトを破棄 548 pobj_parameter->DeleteTempParameters(); 549 550 //パラメータオブジェクトを破棄 551 delete pobj_parameter; 552 547 553 if(plpIndex) *plpIndex=pdi->u.ReturnIndex; 548 554
Note:
See TracChangeset
for help on using the changeset viewer.