X-Git-Url: https://git.librecmc.org/?a=blobdiff_plain;f=scripts%2Fcheckstack.pl;h=55cdd78c1f26d1bd8be8acba1b86fcef89035f8a;hb=1bcdcd2ef0c1fda6b197ead493f9413f0d2ecfc2;hp=41454ceb1bf3a69ea834b311a00c118c8bcefdb8;hpb=d4fea900bdb92d7bba71348a40cb00b6748a8ecc;p=oweals%2Fbusybox.git

diff --git a/scripts/checkstack.pl b/scripts/checkstack.pl
index 41454ceb1..55cdd78c1 100755
--- a/scripts/checkstack.pl
+++ b/scripts/checkstack.pl
@@ -39,6 +39,9 @@ my (@stack, $re, $x, $xs);
 	if ($arch eq 'arm') {
 		#c0008ffc:	e24dd064	sub	sp, sp, #100	; 0x64
 		$re = qr/.*sub.*sp, sp, #(([0-9]{2}|[3-9])[0-9]{2})/o;
+	} elsif ($arch eq 'blackfin') {
+		#      52:       00 e8 03 00     LINK 0xc;
+		$re = qr/.*LINK (0x$x{1,5});$/o;
 	} elsif ($arch =~ /^i[3456]86$/) {
 		#c0105234:       81 ec ac 05 00 00       sub    $0x5ac,%esp
 		$re = qr/^.*[as][du][db]    \$(0x$x{1,8}),\%esp$/o;
@@ -123,7 +126,8 @@ while (my $line = <STDIN>) {
 		$addr =~ s/ /0/g;
 		$addr = "0x$addr";
 
-		my $intro = "$addr $func [$file]:";
+		# bbox: was: my $intro = "$addr $func [$file]:";
+		my $intro = "$func [$file]:";
 		my $padlen = 56 - length($intro);
 		while ($padlen > 0) {
 			$intro .= '	';