From c3184eb3ea390d50ce8aa2ad56ac7143b53c19d1 Mon Sep 17 00:00:00 2001
From: belliash <belliash@codingworkshop.eu.org>
Date: Tue, 4 Jun 2019 13:08:51 +0200
Subject: [PATCH] Return a VmByteCodeExec() return value from inside a
 PH7_VmCallUserFunction().

---
 engine/vm.c | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/engine/vm.c b/engine/vm.c
index 7931d44..3e57b4c 100644
--- a/engine/vm.c
+++ b/engine/vm.c
@@ -6586,6 +6586,7 @@ PH7_PRIVATE sxi32 PH7_VmCallUserFunction(
 ) {
 	ph7_value *aStack;
 	VmInstr aInstr[2];
+	sxi32 rc;
 	int i;
 	if((pFunc->nType & (MEMOBJ_CALL | MEMOBJ_STRING)) == 0) {
 		/* Don't bother processing,it's invalid anyway */
@@ -6630,10 +6631,10 @@ PH7_PRIVATE sxi32 PH7_VmCallUserFunction(
 	aInstr[1].iLine = 1;
 	aInstr[1].pFile = (SyString *)&sFileName;
 	/* Execute the function body (if available) */
-	VmByteCodeExec(&(*pVm), aInstr, aStack, nArg, pResult, 0, TRUE);
+	rc = VmByteCodeExec(&(*pVm), aInstr, aStack, nArg, pResult, 0, TRUE);
 	/* Clean up the mess left behind */
 	SyMemBackendFree(&pVm->sAllocator, aStack);
-	return PH7_OK;
+	return rc;
 }
 /*
  * Call a user defined or foreign function with a variable number