diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2003-01-29 15:35:00 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2003-01-29 15:35:00 +0000 |
| commit | 0ef2c7114b03fcd058645f901c62e4bb3c12d16f (patch) | |
| tree | 2b15d78dafca9ade5c2fe05851476e4fbb351a72 /perl_checker.src | |
| parent | 1f9fe994d4dcec6bf591170cc9c52085d1467ec1 (diff) | |
| download | perl_checker-0ef2c7114b03fcd058645f901c62e4bb3c12d16f.tar perl_checker-0ef2c7114b03fcd058645f901c62e4bb3c12d16f.tar.gz perl_checker-0ef2c7114b03fcd058645f901c62e4bb3c12d16f.tar.bz2 perl_checker-0ef2c7114b03fcd058645f901c62e4bb3c12d16f.tar.xz perl_checker-0ef2c7114b03fcd058645f901c62e4bb3c12d16f.zip | |
add "$."
Diffstat (limited to 'perl_checker.src')
| -rw-r--r-- | perl_checker.src/global_checks.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl_checker.src/global_checks.ml b/perl_checker.src/global_checks.ml index 9f47b6a..f94309a 100644 --- a/perl_checker.src/global_checks.ml +++ b/perl_checker.src/global_checks.ml @@ -114,7 +114,7 @@ let is_global_var context ident = match context with | I_scalar -> (match ident with - | "@" | "!" | ">" | "\\" | "$" | "^A" | "'" | "/" | "?" | "<" | "^W" | "|" | "^I" | "&" + | "@" | "!" | ">" | "\\" | "$" | "^A" | "'" | "/" | "?" | "<" | "^W" | "|" | "^I" | "&" | "." | "0" | "1" | "2" | "3" | "4" | "5" | "6" | "7" | "8" | "9" -> true | _ -> false) | I_array -> |