diff --git a/src/eval.c b/src/eval.c
index baa8c22..8e07b39 100644
--- a/src/eval.c
+++ b/src/eval.c
@@ -349,7 +349,7 @@ apfl_ctx_destroy(apfl_ctx ctx)
     while (ctx->stack_len > 0) {
         stack_must_drop(ctx, -1);
     }
-    FREE_OBJ(ctx->allocator, ctx->stack);
+    FREE_LIST(ctx->allocator, ctx->stack, ctx->stack_cap);
     FREE_OBJ(ctx->allocator, ctx);
 }