X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=op.c;h=9c94cc8c275070122de8deff50665153e7393b6c;hb=20d572319ce8b690b7b68fec6b58f8ac07b1d362;hp=775492319e6455d08af79d5b7a45b9e5da539792;hpb=aaf643cef9412894b3ea120d62ac78b85d183930;p=p5sagit%2Fp5-mst-13.2.git diff --git a/op.c b/op.c index 7754923..9c94cc8 100644 --- 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;