summaryrefslogtreecommitdiff
path: root/perl.c
diff options
context:
space:
mode:
authorSteve Hay <SteveHay@planit.com>2006-04-13 11:27:52 +0100
committerNicholas Clark <nick@ccl4.org>2006-04-13 10:09:20 +0000
commit8ee4cf2435c265a68309f8b98520e063bbdc8e42 (patch)
tree4cccc083bc5bf66ad70fa6b597d427c4b54f36b4 /perl.c
parent32fc9b6af894c845c5b239287596b88571b3fcdf (diff)
downloadperl-8ee4cf2435c265a68309f8b98520e063bbdc8e42.tar.gz
Re: [PATCH] add pTHX_ parameter to new_warnings_bitfield()
Message-ID: <443E1998.9090909@uk.radan.com> Date: Thu, 13 Apr 2006 10:27:52 +0100 p4raw-id: //depot/perl@27784
Diffstat (limited to 'perl.c')
-rw-r--r--perl.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl.c b/perl.c
index 83baacea04..a8fd47fab5 100644
--- a/perl.c
+++ b/perl.c
@@ -2038,7 +2038,7 @@ S_parse_body(pTHX_ char **env, XSINIT_t xsinit)
if (PL_taint_warn && PL_dowarn != G_WARN_ALL_OFF) {
PL_compiling.cop_warnings
- = Perl_new_warnings_bitfield(NULL, WARN_TAINTstring, WARNsize);
+ = Perl_new_warnings_bitfield(aTHX_ NULL, WARN_TAINTstring, WARNsize);
}
if (!scriptname)