From 96a5add60f1f39d38341c09c11f0542e68f782b0 Mon Sep 17 00:00:00 2001 From: Andy Lester Date: Mon, 20 Feb 2006 18:27:11 -0600 Subject: unused context warnings Message-ID: <20060221062711.GA16160@petdance.com> p4raw-id: //depot/perl@27300 --- deb.c | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'deb.c') diff --git a/deb.c b/deb.c index e246b1aa34..3907201014 100644 --- a/deb.c +++ b/deb.c @@ -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 */ } @@ -62,6 +63,7 @@ Perl_vdeb(pTHX_ const char *pat, va_list *args) (long)CopLINE(PL_curcop)); (void) PerlIO_vprintf(Perl_debug_log, pat, *args); #else + PERL_UNUSED_CONTEXT; PERL_UNUSED_ARG(pat); PERL_UNUSED_ARG(args); #endif /* DEBUGGING */ @@ -133,6 +135,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); @@ -306,6 +309,8 @@ Perl_deb_stack_all(pTHX) } /* next stackinfo */ PerlIO_printf(Perl_debug_log, "\n"); +#else + PERL_UNUSED_CONTEXT; #endif /* DEBUGGING */ } -- cgit v1.2.1