Free the 3 actual vectors, not the first 3 times

diff --git a/ast.c b/ast.c
index dfed367c29544371136a971491719664d9b3d1aa..9e59ca917d73c9ed561b10f33bcf8087f01b3c28 100644 (file)
--- a/ast.c
+++ b/ast.c
@@ -809,10 +809,10 @@ void ast_block_delete(ast_block *self)
     vec_free(self->exprs);
     for (i = 0; i < vec_size(self->locals); ++i)
         ast_delete(self->locals[i]);
-    vec_free(self->exprs);
+    vec_free(self->locals);
     for (i = 0; i < vec_size(self->collect); ++i)
         ast_delete(self->collect[i]);
-    vec_free(self->exprs);
+    vec_free(self->collect);
     ast_expression_delete((ast_expression*)self);
     mem_d(self);
 }