From f64fcf66146494e6a4cb4aeeb573cd5d2859716b Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Thu, 10 Apr 2003 19:27:52 +0000
Subject: keys() is a ONE_SCALAR_PARA

---
 perl_checker.src/lexer.mll | 1 +
 1 file changed, 1 insertion(+)

(limited to 'perl_checker.src')

diff --git a/perl_checker.src/lexer.mll b/perl_checker.src/lexer.mll
index aef34a8..60133a7 100644
--- a/perl_checker.src/lexer.mll
+++ b/perl_checker.src/lexer.mll
@@ -433,6 +433,7 @@ rule token = parse
 | "format"   { let _ = raw_here_doc_next_line "." in FORMAT(pos lexbuf) }
 | "defined"
 | "length" 
+| "keys" 
 | "exists" 
 | "ref"      { ONE_SCALAR_PARA(lexeme lexbuf, pos lexbuf) }
 
-- 
cgit v1.2.1