X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl_keyword.pl;h=9312f47c54912742a36fd0b77b120d99fcd49928;hb=6bc89f92370990b836308b02c6551b4e758e7401;hp=904bb59e79b0b243462e718f72c114952096b3ee;hpb=bc9b29dbf2ff006e91ae1d732887485497f58896;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/perl_keyword.pl b/perl_keyword.pl
index 904bb59..9312f47 100644
--- a/perl_keyword.pl
+++ b/perl_keyword.pl
@@ -67,6 +67,7 @@ print <<END;
 I32
 Perl_keyword (pTHX_ const char *name, I32 len)
 {
+    dVAR;
 $switch
 unknown:
   return 0;