projects
/
p5sagit/p5-mst-13.2.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
Storable 2.06 (was Re: Bug in ext/Storable/t/integer.t)
[p5sagit/p5-mst-13.2.git]
/
deb.c
diff --git
a/deb.c
b/deb.c
index
873e2be
..
413e9ff
100644
(file)
--- a/
deb.c
+++ b/
deb.c
@@
-198,7
+198,7
@@
Perl_deb_stack_all(pTHX)
cx = &(si->si_cxstack[ix]);
PerlIO_printf(Perl_debug_log,
" CX %"IVdf": %-6s => ",
- ix, PL_block_type[CxTYPE(cx)]
+ (IV)ix, PL_block_type[CxTYPE(cx)]
);
/* substitution contexts don't save stack pointers etc) */
if (CxTYPE(cx) == CXt_SUBST)