Create a perl5130delta.pod

[p5sagit/p5-mst-13.2.git] / op.c

diff --git a/op.c b/op.c
index 7754923..9c94cc8 100644 (file)
--- a/op.c
+++ b/op.c
@@ -562,6 +562,7 @@ Perl_op_clear(pTHX_ OP *o)
            o->op_targ = 0;
            goto retry;
        }
+    case OP_ENTERTRY:
     case OP_ENTEREVAL: /* Was holding hints. */
        o->op_targ = 0;
        break;