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

Implement VmExecFinallyBlock().
The build was successful. Details

This commit is contained in:
Rafal Kupiec 2019-06-04 19:30:07 +02:00
parent c3184eb3ea
commit bb20f04f3c
Signed by: belliash
GPG Key ID: 4E829243E0CFE6B4
1 changed files with 25 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

25
engine/vm.c
View File

@ -1832,6 +1832,7 @@ static sxi32 VmByteCodeDump(
} }
/* Forward declaration */ /* Forward declaration */
static int VmObConsumer(const void *pData, unsigned int nDataLen, void *pUserData); static int VmObConsumer(const void *pData, unsigned int nDataLen, void *pUserData);
static sxi32 VmExecFinallyBlock(ph7_vm *pVm, ph7_exception *pException);
static sxi32 VmUncaughtException(ph7_vm *pVm, ph7_class_instance *pThis); static sxi32 VmUncaughtException(ph7_vm *pVm, ph7_class_instance *pThis);
static sxi32 VmThrowException(ph7_vm *pVm, ph7_class_instance *pThis); static sxi32 VmThrowException(ph7_vm *pVm, ph7_class_instance *pThis);
/* /*
@ -8081,6 +8082,30 @@ static int vm_builtin_debug_backtrace(ph7_context *pCtx, int nArg, ph7_value **a
*/ */
return PH7_OK; return PH7_OK;
} }
static sxi32 VmExecFinallyBlock(
ph7_vm *pVm, /* Target VM */
ph7_exception *pException /* Exception thrown */
) {
sxi32 rc;
VmFrame *pFrame = pVm->pFrame;
while(pFrame->pParent && (pFrame->iFlags & VM_FRAME_EXCEPTION)) {
/* Safely ignore the exception frame */
pFrame = pFrame->pParent;
}
/* Create a private frame first */
rc = VmEnterFrame(&(*pVm), 0, 0, &pFrame);
if(rc == SXRET_OK) {
/* Mark as 'finally' frame */
pFrame->iFlags |= VM_FRAME_FINALLY;
/* Execute the block */
rc = VmLocalExec(&(*pVm), &pException->sFinally, 0);
/* Release the bytecode container */
SySetRelease(&pException->sFinally);
/* Leave the frame */
VmLeaveFrame(&(*pVm));
}
return rc;
}
/* /*
* The following routine is invoked by the engine when an uncaught * The following routine is invoked by the engine when an uncaught
* exception is triggered. * exception is triggered.