mirror of
https://github.com/AuxXxilium/linux_dsm_epyc7002.git
synced 2024-12-28 09:55:29 +07:00
cb77f0d623
The default NetBSD package manager is pkgsrc and it installs Perl along other third party programs under custom and configurable prefix. The default prefix for binary prebuilt packages is /usr/pkg, and the Perl executable lands in /usr/pkg/bin/perl. This change switches "/usr/bin/perl" to "/usr/bin/env perl" as it's the most portable solution that should work for almost everybody. Perl's executable is detected automatically. This change switches -w option passed to the executable with more modern "use warnings;" approach. There is no functional change to the default behavior. While there, drop "require 5" from scripts/namespace.pl (Perl from 1994?). Signed-off-by: Kamil Rytarowski <n54@gmx.com> Signed-off-by: Masahiro Yamada <yamada.masahiro@socionext.com>
20 lines
379 B
Perl
Executable File
20 lines
379 B
Perl
Executable File
#!/usr/bin/env perl
|
|
|
|
#
|
|
# Takes a (sorted) output of readprofile and turns it into a list suitable for
|
|
# linker scripts
|
|
#
|
|
# usage:
|
|
# readprofile | sort -rn | perl profile2linkerlist.pl > functionlist
|
|
#
|
|
use strict;
|
|
|
|
while (<>) {
|
|
my $line = $_;
|
|
|
|
$_ =~ /\W*[0-9]+\W*([a-zA-Z\_0-9]+)\W*[0-9]+/;
|
|
|
|
print "*(.text.$1)\n"
|
|
unless ($line =~ /unknown/) || ($line =~ /total/);
|
|
}
|