From 248a2c44e8f8e599d64640cff584a2ef5265b9d9 Mon Sep 17 00:00:00 2001 From: David Robillard Date: Mon, 27 Dec 2010 19:20:23 +0000 Subject: Make ATuple a normal LISPey cons cell (it always was anyway). git-svn-id: http://svn.drobilla.net/resp/resp@360 ad02d1e2-f140-0410-9f75-f8b11f17cedd --- src/gc.cpp | 4 ---- 1 file changed, 4 deletions(-) (limited to 'src/gc.cpp') diff --git a/src/gc.cpp b/src/gc.cpp index 5752457..4bae933 100644 --- a/src/gc.cpp +++ b/src/gc.cpp @@ -85,10 +85,6 @@ GC::collect(const Roots& roots) (*i)->mark(false); assert(!(*i)->marked()); } else { - const Tag tag = (*i)->tag(); - if (tag == T_TUPLE) - free(((ATuple*)*i)->_vec); - tlsf_free((tlsf_t*)_pool, ((char*)(*i) - sizeof(Object::Header))); _heap.erase(i); } -- cgit v1.2.1