From d859ed1a60fe1db621949eef605885e2c051c718 Mon Sep 17 00:00:00 2001
From: =?utf8?q?J=C3=A9r=C3=A9mie=20Astor?= <astor.jeremie@wanadoo.fr>
Date: Fri, 3 Apr 2020 16:35:32 +0200
Subject: [PATCH] :art: Fix tupleform

---
 src/env/type.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/env/type.c b/src/env/type.c
index 0ed28187..0c67f6d2 100644
--- a/src/env/type.c
+++ b/src/env/type.c
@@ -33,7 +33,7 @@ ANN static void free_type(Type a, Gwion gwion) {
   if(a->nspc)
     REM_REF(a->nspc, gwion);
   if(a->e->tuple)
-    free_tupleform(gwion->mp, a->e->tuple);
+    free_tupleform(a->e->tuple);
   if(a->e->contains.ptr) {
     for(m_uint i = 0; i < vector_size(&a->e->contains); ++i)
       REM_REF((Type)vector_at(&a->e->contains, i), gwion);
-- 
2.43.0