diff options
| author | Andy Lester <andy@petdance.com> | 2006-02-20 18:27:11 -0600 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2007-01-20 18:14:46 +0000 |
| commit | 1e7ed80eed97f3a17ce1041ce5e5fc0762c34728 (patch) | |
| tree | 73fe2df5a9f931e864be8b8e19b5487c8f00243c /deb.c | |
| parent | 3ecde996b45bcc6ce9ea662e1a0c7fc7dc2e21e5 (diff) | |
| download | perl-1e7ed80eed97f3a17ce1041ce5e5fc0762c34728.tar.gz | |
Integrate:
[ 27178]
Remove a my_perl that slipped in
[ 27300]
Subject: [PATCH] unused context warnings
Message-ID: <20060221062711.GA16160@petdance.com>
p4raw-link: @27300 on //depot/perl: 96a5add60f1f39d38341c09c11f0542e68f782b0
p4raw-link: @27178 on //depot/perl: 932a780a5a7fa583739c54dfd2c041b4d4f48c26
p4raw-id: //depot/maint-5.8/perl@29897
p4raw-integrated: from //depot/perl@29896 'merge in' numeric.c
(@26732..)
p4raw-integrated: from //depot/perl@27300 'edit in' perlapi.c
(@26654..) embed.pl (@27065..) regcomp.c (@27177..) hv.c
(@27238..) pp_ctl.c (@27260..) perl.h util.c (@27289..) sv.c
(@27294..) 'merge in' miniperlmain.c (@24445..) locale.c
(@27065..) mathoms.c (@27126..) utf8.c (@27222..) deb.c perl.c
scope.c universal.c (@27238..) mg.c (@27278..) op.c toke.c
(@27294..)
p4raw-integrated: from //depot/perl@27178 'edit in' perlio.c (@27177..)
Diffstat (limited to 'deb.c')
| -rw-r--r-- | deb.c | 5 |
1 files changed, 5 insertions, 0 deletions
@@ -47,6 +47,7 @@ Perl_deb(pTHX_ const char *pat, ...) vdeb(pat, &args); va_end(args); #else + PERL_UNUSED_CONTEXT; PERL_UNUSED_ARG(pat); #endif /* DEBUGGING */ } @@ -68,6 +69,7 @@ Perl_vdeb(pTHX_ const char *pat, va_list *args) #endif /* USE_5005THREADS */ (void) PerlIO_vprintf(Perl_debug_log, pat, *args); #else + PERL_UNUSED_CONTEXT; PERL_UNUSED_ARG(pat); PERL_UNUSED_ARG(args); #endif /* DEBUGGING */ @@ -137,6 +139,7 @@ S_deb_stack_n(pTHX_ SV** stack_base, I32 stack_min, I32 stack_max, while (1); PerlIO_printf(Perl_debug_log, "\n"); #else + PERL_UNUSED_CONTEXT; PERL_UNUSED_ARG(stack_base); PERL_UNUSED_ARG(stack_min); PERL_UNUSED_ARG(stack_max); @@ -310,6 +313,8 @@ Perl_deb_stack_all(pTHX) } /* next stackinfo */ PerlIO_printf(Perl_debug_log, "\n"); +#else + PERL_UNUSED_CONTEXT; #endif /* DEBUGGING */ } |