diff options
| author | Jason A. Donenfeld <Jason@zx2c4.com> | 2018-11-13 00:39:16 -0800 |
|---|---|---|
| committer | Jason A. Donenfeld <Jason@zx2c4.com> | 2018-11-15 11:49:49 -0800 |
| commit | 789e2c33095432e2d62fa01eb81e99e543065f33 (patch) | |
| tree | b8bf15e1760a25b05e9f0c0f644b6497093bf97f | |
| parent | 2a477b10f47b045255f64aaaeeb07504481b8ca5 (diff) | |
perlasm: cleanup whitespace
Signed-off-by: Jason A. Donenfeld <Jason@zx2c4.com>
| -rw-r--r-- | src/crypto/zinc/perlasm/x86_64-xlate.pl | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/src/crypto/zinc/perlasm/x86_64-xlate.pl b/src/crypto/zinc/perlasm/x86_64-xlate.pl index e4e6c85..9bc0fbd 100644 --- a/src/crypto/zinc/perlasm/x86_64-xlate.pl +++ b/src/crypto/zinc/perlasm/x86_64-xlate.pl @@ -59,7 +59,7 @@ # 9. .init segment is allowed to contain calls to functions only. # a. If function accepts more than 4 arguments *and* >4th argument # is declared as non 64-bit value, do clear its upper part. - + use strict; @@ -587,7 +587,7 @@ my %globals; my $val = shift; if ($val >= 0 && $val < 32) { - return ($DW_OP_complex{lit0}+$val); + return ($DW_OP_complex{lit0}+$val); } return ($DW_OP_complex{consts}, sleb128($val)); } @@ -1133,7 +1133,7 @@ ___ } while(defined(my $line=<>)) { - $line =~ s|\R$||; # Better chomp + $line =~ s|\R$||; # Better chomp $line =~ s|[#!](?!include)(?!ifdef)(?!endif).*$||; # get rid of asm-style comments... $line =~ s|/\*.*\*/||; # ... and C-style comments... @@ -1204,7 +1204,7 @@ print "END\n" if ($masm); close STDOUT; - ################################################# +################################################# # Cross-reference x86_64 ABI "card" # # Unix Win64 @@ -1269,7 +1269,7 @@ close STDOUT; # endif # ret # - ################################################# +################################################# # Win64 SEH, Structured Exception Handling. # # Unlike on Unix systems(*) lack of Win64 stack unwinding information |