From 7e9dccd02cd694632fdbcd0b7f0c524aa95b6fe2 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Wed, 13 Oct 2004 02:04:16 +0000 Subject: handle "use 5.008;" --- perl_checker.src/parser.mly | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl_checker.src/parser.mly b/perl_checker.src/parser.mly index 6a091ac..f988523 100644 --- a/perl_checker.src/parser.mly +++ b/perl_checker.src/parser.mly @@ -173,7 +173,7 @@ use: use_word: | use_revision word comma {new_esp M_none $2.any $1 $3} | use_revision word {new_esp M_none $2.any $1 $2} -| use_revision {new_1esp (Ident(None, "", get_pos $1)) $1 } +| use_revision {new_1esp Undef $1 } use_revision: | USE REVISION comma {$1} -- cgit v1.2.1