Commit abeae4d3 authored by David Benjamin's avatar David Benjamin Committed by Rich Salz
Browse files

Make arm-xlate.pl set use strict. 



It was already nearly clean. Just one undeclared variable.

Reviewed-by: default avatarAndy Polyakov <appro@openssl.org>
Reviewed-by: default avatarRich Salz <rsalz@openssl.org>
(Merged from https://github.com/openssl/openssl/pull/1240)
parent aa951ef3

crypto/perlasm/arm-xlate.pl

+3 −1
Original line number Diff line number Diff line
@@ -6,6 +6,8 @@ 
# in the file LICENSE in the source distribution or at

# https://www.openssl.org/source/license.html



use strict;



my $flavour = shift;

my $output = shift;

open STDOUT,">$output" || die "can't open $output: $!";
@@ -126,7 +128,7 @@ sub expand_line { 
    return $line;

}



while($line=<>) {

while(my $line=<>) {



    if ($line =~ m/^\s*(#|@|\/\/)/)	{ print $line; next; }