X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2Fautovivification.git;a=blobdiff_plain;f=autovivification.xs;h=f0e00473b70709ee7b6915551e459f90db07f9ff;hp=37b6d6509d06b1f3cc2df9462509534114b59a81;hb=7112826bde64279aa69215293b5c94cc584d7388;hpb=c2237219516974eb5eba3b1a71a4b1e49d72c4e0 diff --git a/autovivification.xs b/autovivification.xs index 37b6d65..f0e0047 100644 --- a/autovivification.xs +++ b/autovivification.xs @@ -1024,6 +1024,7 @@ STATIC void a_peep_rec(pTHX_ OP *o, ptable *seen) { case OP_NEXTSTATE: case OP_DBSTATE: case OP_STUB: + case OP_UNSTACK: if (ptable_fetch(seen, o)) return; ptable_seen_store(seen, o, o);