diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2008-09-25 13:02:50 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2008-09-25 13:02:50 +0000 |
commit | 417591df3ca93ce22fa8fe53077adbd74b5d8b76 (patch) | |
tree | edcdf2645660117d1646f914055208d9cbc4b718 /src/lexer.mll | |
parent | 79d3d408c16740c5fd80329a0b0a2299890803b7 (diff) | |
download | perl_checker-417591df3ca93ce22fa8fe53077adbd74b5d8b76.tar perl_checker-417591df3ca93ce22fa8fe53077adbd74b5d8b76.tar.gz perl_checker-417591df3ca93ce22fa8fe53077adbd74b5d8b76.tar.bz2 perl_checker-417591df3ca93ce22fa8fe53077adbd74b5d8b76.tar.xz perl_checker-417591df3ca93ce22fa8fe53077adbd74b5d8b76.zip |
- recognize "state"
Diffstat (limited to 'src/lexer.mll')
-rw-r--r-- | src/lexer.mll | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/lexer.mll b/src/lexer.mll index b25e08c..42f0ddb 100644 --- a/src/lexer.mll +++ b/src/lexer.mll @@ -530,6 +530,7 @@ rule token = parse | "for" { FOR(lexeme lexbuf, pos lexbuf) } | "my" { MY_OUR(lexeme lexbuf, pos lexbuf) } | "our" { MY_OUR(lexeme lexbuf, pos lexbuf) } +| "state" { MY_OUR(lexeme lexbuf, pos lexbuf) } | "local" { LOCAL(pos lexbuf) } | "continue" { CONTINUE(pos lexbuf) } | "sub" { SUB(pos lexbuf) } |