Do not hold pointer into a bag while creating a new Plist

gap-system · Jun 15, 2018 · d509288 · d509288
1 parent e3c7d10
commit d509288
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/src/trans.c b/src/trans.c
@@ -3139,10 +3139,11 @@ Obj FuncCYCLES_TRANS(Obj self, Obj f)
         return out;
     }
 
-    seen = ResizeInitTmpTrans(deg);
     out = NEW_PLIST(T_PLIST, 0);
     nr = 0;
 
+    seen = ResizeInitTmpTrans(deg);
+
     if (TNUM_OBJ(f) == T_TRANS2) {
         ptf2 = CONST_ADDR_TRANS2(f);
         for (i = 0; i < deg; i++) {