From: Andy Polyakov Date: Sat, 30 Aug 2014 17:17:09 +0000 (+0200) Subject: md5-x86_64.pl: work around warning. X-Git-Tag: master-post-reformat~426 X-Git-Url: https://git.librecmc.org/?a=commitdiff_plain;h=4d86e8df6be69ed13abb73fd564f1f894eea0a98;p=oweals%2Fopenssl.git md5-x86_64.pl: work around warning. Reviewed-by: Rich Salz --- diff --git a/crypto/md5/asm/md5-x86_64.pl b/crypto/md5/asm/md5-x86_64.pl index f7dae27576..8d820e1140 100755 --- a/crypto/md5/asm/md5-x86_64.pl +++ b/crypto/md5/asm/md5-x86_64.pl @@ -116,6 +116,7 @@ sub round4_step EOF } +no warnings qw(uninitialized); my $flavour = shift; my $output = shift; if ($flavour =~ /\./) { $output = $flavour; undef $flavour; } @@ -127,7 +128,6 @@ $0 =~ m/(.*[\/\\])[^\/\\]+$/; my $dir=$1; my $xlate; ( $xlate="${dir}../../perlasm/x86_64-xlate.pl" and -f $xlate) or die "can't locate x86_64-xlate.pl"; -no warnings qw(uninitialized); open OUT,"| \"$^X\" $xlate $flavour $output"; *STDOUT=*OUT;