This is an archive of the discontinued LLVM Phabricator instance.

Formatting: added parentheses to eliminate warnings from fresh perl versions.
ClosedPublic

Authored by AndreyChurbanov on Jul 8 2016, 7:10 AM.

Reviewers

Summary

Formatting: added parentheses to eliminate warnings from fresh perl versions. Also eliminated extra spaces.

AndreyChurbanov retitled this revision from to Formatting: added parentheses to eliminate warnings from fresh perl versions..

AndreyChurbanov updated this object.

AndreyChurbanov set the repository for this revision to rL LLVM.

LGTM.

This revision is now accepted and ready to land.Jul 8 2016, 7:36 AM

Path

Size

runtime/

tools/

lib/

2 lines

	Show All 11 Lines

	use strict;			use strict;
	use warnings;			use warnings;

	use tools;			use tools;

	sub empty($) {			sub empty($) {
	my ( $var ) = @_;			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			}; # sub empty

	my ( $base, $out, $tmp );			my ( $base, $out, $tmp );
	if ( empty( "LIBOMP_WORK" ) ) {			if ( empty( "LIBOMP_WORK" ) ) {
	# $FindBin::Bin is not used intentionally because it gives real path. I want to use absolute,			# $FindBin::Bin is not used intentionally because it gives real path. I want to use absolute,
	# but not real one (real path does not contain symlinks while absolute path may contain			# but not real one (real path does not contain symlinks while absolute path may contain
	# symlinks).			# symlinks).
	$base = get_dir( get_dir( abs_path( $0 ) ) );			$base = get_dir( get_dir( abs_path( $0 ) ) );
	▲ Show 20 Lines • Show All 57 Lines • Show Last 20 Lines