diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-05-30 23:56:14 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-05-30 23:56:14 +0000 |
commit | 9c5ffd7c3fe1ab64d3e7d06810ac3ab42426718b (patch) | |
tree | 0865e36d778d81c5329cbbace339ef7bc601980a /ext/Devel | |
parent | a355d973eb7817e2c7ea1f451ee3c80da9cf5765 (diff) | |
download | perl-9c5ffd7c3fe1ab64d3e7d06810ac3ab42426718b.tar.gz |
More -Wall sweeping.
p4raw-id: //depot/perl@10338
Diffstat (limited to 'ext/Devel')
-rw-r--r-- | ext/Devel/DProf/DProf.xs | 2 | ||||
-rw-r--r-- | ext/Devel/Peek/Peek.xs | 2 |
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; |