diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2002-11-10 16:38:14 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2002-11-10 16:38:14 +0000 |
| commit | be344c9ed676859feddde5c24ef78ac78ab5d570 (patch) | |
| tree | 995c21b37e72e8d2bf8e497578fbe61ece67ff05 /perl_checker.src/lexer.mll | |
| parent | c8ff668a19bfca65bbcd8f72f939729034c138c2 (diff) | |
| download | perl_checker-be344c9ed676859feddde5c24ef78ac78ab5d570.tar perl_checker-be344c9ed676859feddde5c24ef78ac78ab5d570.tar.gz perl_checker-be344c9ed676859feddde5c24ef78ac78ab5d570.tar.bz2 perl_checker-be344c9ed676859feddde5c24ef78ac78ab5d570.tar.xz perl_checker-be344c9ed676859feddde5c24ef78ac78ab5d570.zip | |
*** empty log message ***
Diffstat (limited to 'perl_checker.src/lexer.mll')
| -rw-r--r-- | perl_checker.src/lexer.mll | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl_checker.src/lexer.mll b/perl_checker.src/lexer.mll index 49f5102..6abbbc2 100644 --- a/perl_checker.src/lexer.mll +++ b/perl_checker.src/lexer.mll @@ -112,7 +112,7 @@ rule token = parse | space+ { (* propagate not_ok_for_match when it was set by the previous token *) if lexeme_start lexbuf = !not_ok_for_match then not_ok_for_match := lexeme_end lexbuf; - (*SPACE(pos lexbuf) *) token lexbuf + (*SPACE(pos lexbuf) *) token lexbuf } | '#' [^ '\n']* { (*COMMENT(lexeme lexbuf, pos lexbuf)*) token lexbuf } |