use LOOP struct for entergiven op

[perl5.git] / regen / opcodes

diff --git a/regen/opcodes b/regen/opcodes
index 18dc4fc..b60eda0 100644 (file)
--- a/regen/opcodes
+++ b/regen/opcodes
@@ -328,7 +328,7 @@ method_super        super with known name   ck_null         d.
 method_redir   redirect method with known name ck_null d.
 method_redir_super     redirect super method with known name   ck_null d.
 
-entergiven     given()                 ck_null         d|
+entergiven     given()                 ck_null         d{
 leavegiven     leave given block       ck_null         1
 enterwhen      when()                  ck_null         d|
 leavewhen      leave when block        ck_null         1