Missing an initialisation, as spotted by Merijn's HP compiler.

p4raw-id: //depot/perl@26767

1 files changed, 1 insertions, 0 deletions

diff --git a/toke.c b/toke.c
index d26c7acbc4..dd5b71e50c 100644
--- a/toke.c
+++ b/toke.c
@@ -4240,6 +4240,7 @@ Perl_yylex(pTHX)
 	    just_a_word_zero_gv:
 		gv = NULL;
 		gvp = NULL;
+		orig_keyword = 0;
 	    }
 	  just_a_word: {
 		SV *sv;