Changeset 31 in dev for BasicCompiler64/OperatorProc.cpp
- Timestamp:
- Jan 13, 2007, 4:26:50 AM (18 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
BasicCompiler64/OperatorProc.cpp
r11 r31 69 69 ///////////////////////////////////////////// 70 70 71 PARAMETER_INFO *ppi ;71 PARAMETER_INFO *ppi = (PARAMETER_INFO *)HeapAlloc(hHeap,0,sizeof(PARAMETER_INFO)*3); 72 72 int iParmNum=0; 73 74 //_System_LocalThis75 ppi=(PARAMETER_INFO *)HeapAlloc(hHeap,0,sizeof(PARAMETER_INFO)*3);76 ppi[iParmNum].bArray=0;77 ppi[iParmNum].bByVal=0;78 ppi[iParmNum].name=0;79 ppi[iParmNum].type=DEF_PTR_VOID;80 ppi[iParmNum].u.index=-1;81 ppi[iParmNum].SubScripts[0]=-1;82 iParmNum++;83 73 84 74 if(bTwoTerm){ … … 461 451 ////////////////////////////////////////////////////// 462 452 463 RetTypeInfo.type=Opcode_CallProc(Parameter,ppsi[0],&RetTypeInfo.u.lpIndex,0,ObjectName,DEF_OBJECT); 453 Opcode_CallProc(Parameter,ppsi[0],0,ObjectName,DEF_OBJECT); 454 RetTypeInfo.type = ppsi[0]->ReturnType; 455 RetTypeInfo.u.lpIndex = ppsi[0]->u.ReturnIndex; 464 456 465 457 //mov reg,rax
Note:
See TracChangeset
for help on using the changeset viewer.