diff --git a/runtime/tools/lib/LibOMP.pm b/runtime/tools/lib/LibOMP.pm index 06a371f6e06c850303669fd292dd43cb93ef71ad..012767e161e15d22f47a1cdb89ce44570a83f1ac 100644 --- a/runtime/tools/lib/LibOMP.pm +++ b/runtime/tools/lib/LibOMP.pm @@ -17,7 +17,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 );