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 | 9b5ef0220ad4b55d0bec95f0d031fcfa6f9e076d (patch) | |
| tree | cf272a136b4063d3c7b9fd8ed24ef1aec5b1672d /runtime/tools | |
| parent | e7e8b2803ed9a325e76177b4f36e3c57bf88a795 (diff) | |
[OpenMP] Add missing parenthesis in Perl module
git-svn-id: https://llvm.org/svn/llvm-project/openmp/trunk@356289 91177308-0d34-0410-b5e6-96231b3b80d8
Diffstat (limited to 'runtime/tools')
| -rw-r--r-- | runtime/tools/lib/LibOMP.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/runtime/tools/lib/LibOMP.pm b/runtime/tools/lib/LibOMP.pm index 497b926..cff7e4a 100644 --- a/runtime/tools/lib/LibOMP.pm +++ b/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 ); |