Propagate 2 edits made in Perl_keywords() back to perl_keywords.pl

7918f24d20384771 added PERL_ARGS_ASSERT_KEYWORD and 9b38784150c0aca5 combined
Perl_ckwarn_d() and Perl_warner() into Perl_ck_warner_d().

diff --git a/perl_keyword.pl b/perl_keyword.pl
index 73128c3..63813ab 100644 (file)
--- a/perl_keyword.pl
+++ b/perl_keyword.pl
@@ -69,6 +69,9 @@ I32
 Perl_keyword (pTHX_ const char *name, I32 len, bool all_keywords)
 {
     dVAR;
+
+    PERL_ARGS_ASSERT_KEYWORD;
+
 $switch
 unknown:
   return 0;
@@ -82,8 +85,7 @@ sub perl_keyword
 
   if ($k eq 'elseif') {
     return <<END;
-if(ckWARN_d(WARN_SYNTAX))
-  Perl_warner(aTHX_ packWARN(WARN_SYNTAX), "elseif should be elsif");
+Perl_ck_warner_d(aTHX_ packWARN(WARN_SYNTAX), "elseif should be elsif");
 END
   }
   elsif (my $feature = $feature_kw{$k}) {