CALL instructions need to offset the st++ too

diff --git a/execloop.h b/execloop.h
index af544b9483e56bf69605760a2b22d34e4b6cc2fe..1af144ac3537b121dca30edd9b2a623393ae2c08 100644 (file)
--- a/execloop.h
+++ b/execloop.h
@@ -312,7 +312,7 @@ while (1) {
                                                  builtinnumber, prog->filename);
                        }
                        else
-                               st = prog->code + prog_enterfunction(prog, newf);
+                               st = prog->code + prog_enterfunction(prog, newf) - 1; /* offset st++ */
                        if (prog->vmerror)
                                goto cleanup;
                        break;