diff options
| author | Jonathan Peyton <jonathan.l.peyton@intel.com> | 2019-03-15 18:27:14 +0000 |
|---|---|---|
| committer | Jonathan Peyton <jonathan.l.peyton@intel.com> | 2019-03-15 18:27:14 +0000 |
| commit | 5af1c22d0b35624256bb8ed6fb9aa8c6c9f074f8 (patch) | |
| tree | c0b6304061685b16e78e7a430c9c7ae21146a471 | |
| parent | 44b476c141cda3f69b3ecbda1ce5948ab5fac984 (diff) | |
| download | bcm5719-llvm-5af1c22d0b35624256bb8ed6fb9aa8c6c9f074f8.tar.gz bcm5719-llvm-5af1c22d0b35624256bb8ed6fb9aa8c6c9f074f8.zip | |
[OpenMP] Add missing parenthesis in Perl module
llvm-svn: 356289
| -rw-r--r-- | openmp/runtime/tools/lib/LibOMP.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/openmp/runtime/tools/lib/LibOMP.pm b/openmp/runtime/tools/lib/LibOMP.pm index 497b926fa99..cff7e4a0a25 100644 --- a/openmp/runtime/tools/lib/LibOMP.pm +++ b/openmp/runtime/tools/lib/LibOMP.pm @@ -16,7 +16,7 @@ use tools; sub empty($) { my ( $var ) = @_; - return (not exists($ENV{$var})) or (not defined($ENV{$var})) or ($ENV{$var} eq ""); + return ((not exists($ENV{$var})) or (not defined($ENV{$var})) or ($ENV{$var} eq "")); }; # sub empty my ( $base, $out, $tmp ); |
