aerscript
/
Aer
0
6
Fork 0
Code Issues 6 Pull Requests Releases 2 Wiki Activity

Do not create variables automatically on each OP_CALL using VmExtractMemObj().
The build was successful. Details

This commit is contained in:
Rafal Kupiec 2019-05-01 18:19:04 +02:00
parent 3dfa4232ba
commit 7d606cbf1d
Signed by: belliash
GPG Key ID: 4E829243E0CFE6B4
1 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
engine/vm.c
View File

@ -4712,7 +4712,7 @@ static sxi32 VmByteCodeExec(
"constant", &pVmFunc->sName, n + 1);
}
/* Switch to pass by value */
pObj = VmExtractMemObj(&(*pVm), &aFormalArg[n].sName, FALSE, TRUE);
pObj = VmCreateMemObj(&(*pVm), &aFormalArg[n].sName, FALSE);
} else {
SyHashEntry *pRefEntry;
/* Install the referenced variable in the private function frame */
@ -4728,7 +4728,7 @@ static sxi32 VmByteCodeExec(
}
} else {
/* Pass by value, make a copy of the given argument */
pObj = VmExtractMemObj(&(*pVm), &aFormalArg[n].sName, FALSE, TRUE);
pObj = VmCreateMemObj(&(*pVm), &aFormalArg[n].sName, FALSE);
}
} else {
char zName[32];
@ -4737,7 +4737,7 @@ static sxi32 VmByteCodeExec(
sName.nByte = SyBufferFormat(zName, sizeof(zName), "[%u]apArg", n);
sName.zString = zName;
/* Anonymous argument */
pObj = VmExtractMemObj(&(*pVm), &sName, TRUE, TRUE);
pObj = VmExtractMemObj(&(*pVm), &sName, TRUE, FALSE);
}
if(pObj) {
PH7_MemObjStore(pArg, pObj);
@ -4762,7 +4762,7 @@ static sxi32 VmByteCodeExec(
/* Do not install null value */
continue;
}
pValue = VmExtractMemObj(pVm, &pEnv->sName, FALSE, TRUE);
pValue = VmCreateMemObj(pVm, &pEnv->sName, FALSE);
if(pValue == 0) {
continue;
}
@ -4775,7 +4775,7 @@ static sxi32 VmByteCodeExec(
/* Process default values */
while(n < SySetUsed(&pVmFunc->aArgs)) {
if(SySetUsed(&aFormalArg[n].aByteCode) > 0) {
pObj = VmExtractMemObj(&(*pVm), &aFormalArg[n].sName, FALSE, TRUE);
pObj = VmCreateMemObj(&(*pVm), &aFormalArg[n].sName, FALSE);
if(pObj) {
/* Evaluate the default value and extract it's result */
rc = VmLocalExec(&(*pVm), &aFormalArg[n].aByteCode, pObj);