scripts/recordmcount.pl: Make indent spacing consistent

Emacs by default will have perl files have 4 space indents, where 8 spaces
are represented with a single tab. There are some places in
recordmcount.pl that has 8 spaces where a tab should be used. Replace them
to make the file consistent.

No functional changes.

Cc: "John (Warthog9) Hawley" <warthog9@kernel.org>
Signed-off-by: default avatarSteven Rostedt (VMware) <rostedt@goodmis.org>
parent 9a6944fe
...@@ -266,9 +266,9 @@ if ($arch eq "x86_64") { ...@@ -266,9 +266,9 @@ if ($arch eq "x86_64") {
# force flags for this arch # force flags for this arch
$ld .= " -m shlelf_linux"; $ld .= " -m shlelf_linux";
if ($endian eq "big") { if ($endian eq "big") {
$objcopy .= " -O elf32-shbig-linux"; $objcopy .= " -O elf32-shbig-linux";
} else { } else {
$objcopy .= " -O elf32-sh-linux"; $objcopy .= " -O elf32-sh-linux";
} }
} elsif ($arch eq "powerpc") { } elsif ($arch eq "powerpc") {
...@@ -289,12 +289,12 @@ if ($arch eq "x86_64") { ...@@ -289,12 +289,12 @@ if ($arch eq "x86_64") {
$ldemulation = "lppc" $ldemulation = "lppc"
} }
if ($bits == 64) { if ($bits == 64) {
$type = ".quad"; $type = ".quad";
$cc .= " -m64 "; $cc .= " -m64 ";
$ld .= " -m elf64".$ldemulation." "; $ld .= " -m elf64".$ldemulation." ";
} else { } else {
$cc .= " -m32 "; $cc .= " -m32 ";
$ld .= " -m elf32".$ldemulation." "; $ld .= " -m elf32".$ldemulation." ";
} }
} elsif ($arch eq "arm") { } elsif ($arch eq "arm") {
...@@ -313,7 +313,7 @@ if ($arch eq "x86_64") { ...@@ -313,7 +313,7 @@ if ($arch eq "x86_64") {
$type = "data8"; $type = "data8";
if ($is_module eq "0") { if ($is_module eq "0") {
$cc .= " -mconstant-gp"; $cc .= " -mconstant-gp";
} }
} elsif ($arch eq "sparc64") { } elsif ($arch eq "sparc64") {
# In the objdump output there are giblets like: # In the objdump output there are giblets like:
...@@ -530,10 +530,10 @@ while (<IN>) { ...@@ -530,10 +530,10 @@ while (<IN>) {
$read_function = defined($text_sections{$1}); $read_function = defined($text_sections{$1});
if (!$read_function) { if (!$read_function) {
foreach my $prefix (keys %text_section_prefixes) { foreach my $prefix (keys %text_section_prefixes) {
if (substr($1, 0, length $prefix) eq $prefix) { if (substr($1, 0, length $prefix) eq $prefix) {
$read_function = 1; $read_function = 1;
last; last;
} }
} }
} }
# print out any recorded offsets # print out any recorded offsets
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment