summaryrefslogtreecommitdiff
path: root/proto.h
diff options
context:
space:
mode:
authorDave Mitchell <davem@fdisolutions.com>2003-02-26 14:49:47 +0000
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2003-05-29 18:47:40 +0000
commitb5c19bd7c15bd02a18c3c2b80b6f602827ecdbcc (patch)
tree62bd6c218608670924b1f52603773478868e7f69 /proto.h
parentd3f88289ec6f15b80a5a99970a0ca8fd4c679869 (diff)
downloadperl-b5c19bd7c15bd02a18c3c2b80b6f602827ecdbcc.tar.gz
jumbo closure fix
Message-ID: <20030226144947.A14444@fdgroup.com> p4raw-id: //depot/perl@19637
Diffstat (limited to 'proto.h')
-rw-r--r--proto.h3
1 files changed, 1 insertions, 2 deletions
diff --git a/proto.h b/proto.h
index 97844a56d3..1f03b3bdaa 100644
--- a/proto.h
+++ b/proto.h
@@ -1317,11 +1317,10 @@ PERL_CALLCONV void Perl_pad_fixup_inner_anons(pTHX_ PADLIST *padlist, CV *old_cv
PERL_CALLCONV void Perl_pad_push(pTHX_ PADLIST *padlist, int depth, int has_args);
#if defined(PERL_IN_PAD_C) || defined(PERL_DECL_PROT)
-STATIC PADOFFSET S_pad_findlex(pTHX_ char* name, PADOFFSET newoff, CV* innercv);
+STATIC PADOFFSET S_pad_findlex(pTHX_ char *name, CV* cv, U32 seq, int warn, SV** out_capture, SV** out_name_sv, int *out_flags);
# if defined(DEBUGGING)
STATIC void S_cv_dump(pTHX_ CV *cv, char *title);
# endif
-STATIC CV* S_cv_clone2(pTHX_ CV *proto, CV *outside);
#endif
PERL_CALLCONV CV* Perl_find_runcv(pTHX_ U32 *db_seqp);
PERL_CALLCONV void Perl_free_tied_hv_pool(pTHX);