use LOOP struct for entergiven op

This will support the upcoming change to let loop control ops apply to
"given" blocks.

1 files changed, 1 insertions, 1 deletions

diff --git a/dump.c b/dump.c
index b2f0fc5ef2..009266c877 100644
--- a/dump.c
+++ b/dump.c
@@ -1200,6 +1200,7 @@ S_do_op_dump_bar(pTHX_ I32 level, UV bar, PerlIO *file, const OP *o)
 
     case OP_ENTERITER:
     case OP_ENTERLOOP:
+    case OP_ENTERGIVEN:
 	S_opdump_indent(aTHX_ o, level, bar, file, "REDO");
         S_opdump_link(aTHX_ cLOOPo->op_redoop, file);
 	S_opdump_indent(aTHX_ o, level, bar, file, "NEXT");
@@ -1221,7 +1222,6 @@ S_do_op_dump_bar(pTHX_ I32 level, UV bar, PerlIO *file, const OP *o)
     case OP_DORASSIGN:
     case OP_ANDASSIGN:
     case OP_ARGDEFELEM:
-    case OP_ENTERGIVEN:
     case OP_ENTERWHEN:
     case OP_ENTERTRY:
     case OP_ONCE: