Improve TCO

Instead of checking for self-recursion check that the thing we're
calling is a function and not a closure, therefore the new frame will
have the same env as the current frame.

1 files changed, 1 insertions, 1 deletions

diff --git a/execute.c b/execute.c
index 241b5dad..a1284f98 100644
--- a/execute.c
+++ b/execute.c
@@ -657,7 +657,7 @@ jv jq_next(jq_state *jq) {
       uint16_t* retaddr;
       struct frame* new_frame;
       struct closure cl = make_closure(jq, pc);
-      if (nclosures == 0 && *(pc + 2) == RET && frame_current(jq)->bc == cl.bc) {
+      if (nclosures == 0 && *(pc + 2) == RET && *pc == 1) {
         // TCO
         retaddr = frame_current(jq)->retaddr;
         stack_ptr retdata = frame_current(jq)->retdata;