Revision: 1425
Author: [email protected]
Date: Fri Aug 10 04:32:58 2012
Log: fix unused result compiler warnings
http://code.google.com/p/perl-devel-nytprof/source/detail?r=1425
Modified:
/trunk/NYTProf.xs
=======================================
--- /trunk/NYTProf.xs Wed Jun 27 06:13:42 2012
+++ /trunk/NYTProf.xs Fri Aug 10 04:32:58 2012
@@ -1825,7 +1825,7 @@
DBsv = hv_delete(GvHV(PL_DBsub), SvPVX(fullnamesv), (I32)total_len, 1);
if (DBsv && parse_DBsub_value(aTHX_ DBsv, NULL, &line, NULL,
SvPVX(fullnamesv))) {
- SvREFCNT_inc(DBsv); /* was made mortal by hv_delete */
+ (void)SvREFCNT_inc(DBsv); /* was made mortal by hv_delete */
sv_catpvf(fullnamesv, "@%u", (unsigned int)line);
if (hv_fetch(GvHV(PL_DBsub), SvPV_nolen(fullnamesv),
(I32)SvCUR(fullnamesv), 0)) {
static unsigned int dup_begin_seqn;
@@ -2551,9 +2551,9 @@
/* XXX if the goto op or goto'd xsub croaks then this'll leak */
/* we can't mortalize here because we're about to leave scope */
- SvREFCNT_inc(goto_subr_entry.caller_subnam_sv);
- SvREFCNT_inc(goto_subr_entry.called_subnam_sv);
- SvREFCNT_inc(sub_sv);
+ (void)SvREFCNT_inc(goto_subr_entry.caller_subnam_sv);
+ (void)SvREFCNT_inc(goto_subr_entry.called_subnam_sv);
+ (void)SvREFCNT_inc(sub_sv);
/* grab the CvSTART of the called sub since it's available */
called_cv = (CV*)SvRV(sub_sv);
--
You've received this message because you are subscribed to
the Devel::NYTProf Development User group.
Group hosted at: http://groups.google.com/group/develnytprof-dev
Project hosted at: http://perl-devel-nytprof.googlecode.com
CPAN distribution: http://search.cpan.org/dist/Devel-NYTProf
To post, email: [email protected]
To unsubscribe, email: [email protected]
