Revert "Forbid labels with keyword names"

This reverts commit f71d6157c7933c0d3df645f0411d97d7e2b66b2f.

Revert "Add new error "Can't use keyword '%s' as a label""

This reverts commit 28ccebc469d90664106fcc1cb73d7321c4b60716.

1 files changed, 0 insertions, 2 deletions

diff --git a/toke.c b/toke.c
index 7167004c1f..a7a71a4cea 100644
--- a/toke.c
+++ b/toke.c
@@ -6143,8 +6143,6 @@ Perl_yylex(pTHX)
 	/* Is this a label? */
 	if (!anydelim && PL_expect == XSTATE
 	      && d < PL_bufend && *d == ':' && *(d + 1) != ':') {
-	    if (tmp)
-		Perl_croak(aTHX_ "Can't use keyword '%s' as a label", PL_tokenbuf);
 	    s = d + 1;
 	    pl_yylval.pval = CopLABEL_alloc(PL_tokenbuf);
 	    CLINE;