summaryrefslogtreecommitdiff
path: root/ext/Devel
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2001-05-30 23:56:14 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2001-05-30 23:56:14 +0000
commit9c5ffd7c3fe1ab64d3e7d06810ac3ab42426718b (patch)
tree0865e36d778d81c5329cbbace339ef7bc601980a /ext/Devel
parenta355d973eb7817e2c7ea1f451ee3c80da9cf5765 (diff)
downloadperl-9c5ffd7c3fe1ab64d3e7d06810ac3ab42426718b.tar.gz
More -Wall sweeping.
p4raw-id: //depot/perl@10338
Diffstat (limited to 'ext/Devel')
-rw-r--r--ext/Devel/DProf/DProf.xs2
-rw-r--r--ext/Devel/Peek/Peek.xs2
2 files changed, 2 insertions, 2 deletions
diff --git a/ext/Devel/DProf/DProf.xs b/ext/Devel/DProf/DProf.xs
index aba6de99d3..0cd7daaac7 100644
--- a/ext/Devel/DProf/DProf.xs
+++ b/ext/Devel/DProf/DProf.xs
@@ -384,7 +384,7 @@ test_time(pTHX_ clock_t *r, clock_t *u, clock_t *s)
int i, j, k = 0;
HV *oldstash = PL_curstash;
struct tms t1, t2;
- clock_t realtime1, realtime2;
+ clock_t realtime1 = 0, realtime2 = 0;
U32 ototal = g_total;
U32 ostack = g_SAVE_STACK;
U32 operldb = PL_perldb;
diff --git a/ext/Devel/Peek/Peek.xs b/ext/Devel/Peek/Peek.xs
index 1e481492b5..b3131b6c85 100644
--- a/ext/Devel/Peek/Peek.xs
+++ b/ext/Devel/Peek/Peek.xs
@@ -10,7 +10,7 @@ DeadCode(pTHX)
return Nullsv;
#else
SV* sva;
- SV* sv, *dbg;
+ SV* sv;
SV* ret = newRV_noinc((SV*)newAV());
register SV* svend;
int tm = 0, tref = 0, ts = 0, ta = 0, tas = 0;