:bug: Fix freearg_dottmpl

diff --git a/src/lib/func.c b/src/lib/func.c
index 7d34c9ddafe954f7247bde8ee86052c0a825fe25..dde379b3b318a0313ef3f4ff319a264576b1c7aa 100644 (file)
--- a/src/lib/func.c
+++ b/src/lib/func.c
@@ -292,7 +292,8 @@ static FREEARG(freearg_xork) {
 
 static FREEARG(freearg_dottmpl) {
   struct dottmpl_ *dt = (struct dottmpl_*)instr->m_val;
-  free_type_list(((Gwion)gwion)->mp, dt->tl);
+  if(dt->tl)
+    free_type_list(((Gwion)gwion)->mp, dt->tl);
   mp_free(((Gwion)gwion)->mp, dottmpl, dt);
 }