diff options
Diffstat (limited to 'scripts/checkstack.pl')
-rwxr-xr-x | scripts/checkstack.pl | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/scripts/checkstack.pl b/scripts/checkstack.pl index 663158627155..b458e2acb4ac 100755 --- a/scripts/checkstack.pl +++ b/scripts/checkstack.pl | |||
@@ -78,6 +78,9 @@ my (@stack, $re, $x, $xs); | |||
78 | # pair for larger users. -- PFM. | 78 | # pair for larger users. -- PFM. |
79 | #a00048e0: d4fc40f0 addi.l r15,-240,r15 | 79 | #a00048e0: d4fc40f0 addi.l r15,-240,r15 |
80 | $re = qr/.*addi\.l.*r15,-(([0-9]{2}|[3-9])[0-9]{2}),r15/o; | 80 | $re = qr/.*addi\.l.*r15,-(([0-9]{2}|[3-9])[0-9]{2}),r15/o; |
81 | } elsif ($arch =~ /^blackfin$/) { | ||
82 | # 0: 00 e8 38 01 LINK 0x4e0; | ||
83 | $re = qr/.*[[:space:]]LINK[[:space:]]*(0x$x{1,8})/o; | ||
81 | } else { | 84 | } else { |
82 | print("wrong or unknown architecture\n"); | 85 | print("wrong or unknown architecture\n"); |
83 | exit | 86 | exit |