diff options
| -rw-r--r-- | NEWS | 1 | ||||
| -rw-r--r-- | TODO | 2 | ||||
| -rw-r--r-- | src/global_checks.ml | 2 |
3 files changed, 2 insertions, 3 deletions
@@ -3,6 +3,7 @@ o update Net::FTP for installer - perl_checker: o recognize \B in regexps + o recognize -p (pipe test) & -S (socket test) o kill "undeclared variable $^S" Version 1.2.17 - 19 March 2012, by Thierry Vignaud @@ -8,8 +8,6 @@ - $run{with_flags} .= $run{with_flags} . " --without " . $_[0]; -- unknown function -p - - $short_entries[$#entries] = $1; - sort { values %{$list->[$a]} <=> values %{$list->[$b]} } diff --git a/src/global_checks.ml b/src/global_checks.ml index ceed828..af651b0 100644 --- a/src/global_checks.ml +++ b/src/global_checks.ml @@ -183,7 +183,7 @@ let is_global_var context ident = | _ -> false) | I_func -> (match ident with - | "-b" | "-c" | "-d" | "-e" | "-f" | "-l" | "-o" | "-r" | "-s" | "-w" | "-x" | "-z" | "-t" + | "-b" | "-c" | "-d" | "-e" | "-f" | "-l" | "-o" | "-p" | "-r" | "-S" | "-s" | "-w" | "-x" | "-z" | "-t" | "abs" | "alarm" | "atan2" | "bless" | "caller" | "chdir" | "chmod" | "chomp" | "chop" | "chown" | "chr" | "chroot" | "close" | "closedir" | "cos" | "crypt" | "defined" | "delete" | "die" |