This is a live mirror of the Perl 5 development currently hosted at
https://github.com/perl/perl5
https://perl5.git.perl.org
/
perl5.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
leakfinder.pl: Run code more times
[perl5.git]
/
deb.c
diff --git
a/deb.c
b/deb.c
index
838e664
..
bccfc18
100644
(file)
--- a/
deb.c
+++ b/
deb.c
@@
-114,7
+114,7
@@
S_deb_stack_n(pTHX_ SV** stack_base, I32 stack_min, I32 stack_max,
{
#ifdef DEBUGGING
dVAR;
-
register
I32 i = stack_max - 30;
+ I32 i = stack_max - 30;
const I32 *markscan = PL_markstack + mark_min;
PERL_ARGS_ASSERT_DEB_STACK_N;