1 files changed, 4 insertions, 3 deletions
diff --git a/src/gc.cpp b/src/gc.cpp
index 8ed0fb2..cff4f0a 100644
--- a/src/gc.cpp
+++ b/src/gc.cpp
@@ -57,7 +57,7 @@ mark(const Object* obj)
 
 	obj->mark(true);
 	if (obj->tag() != T_UNKNOWN) {
-		const ATuple* tup = ((const AST*)obj)->to<const ATuple*>();
+		const ATuple* tup = ((const AST*)obj)->to_tuple();
 		if (tup)
 			FOREACHP(ATuple::const_iterator, i, tup)
 				mark(*i);
@@ -80,8 +80,9 @@ GC::collect(const Roots& roots)
 			(*i)->mark(false);
 			assert(!(*i)->marked());
 		} else {
-			if ((*i)->tag() != T_UNKNOWN)
-				((AST*)*i)->~AST();
+			const Tag tag = (*i)->tag();
+			if (tag == T_TUPLE || tag == T_TYPE)
+				free(((ATuple*)*i)->_vec);
 
 			tlsf_free((tlsf_t*)_pool, ((char*)(*i) - sizeof(Object::Header)));
 			_heap.erase(i);