diff options
| author | Nicholas Clark <nick@ccl4.org> | 2010-02-10 09:57:23 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2010-05-24 15:50:57 +0100 |
| commit | d5b1589c09b534ccfeb2eae26b3de9339c1bf22b (patch) | |
| tree | 64fa4c03090b557d0687e9e3e845a62d74dc01fd /embed.fnc | |
| parent | e42956688f2e0df936f1a42811962946e4e185bf (diff) | |
| download | perl-d5b1589c09b534ccfeb2eae26b3de9339c1bf22b.tar.gz | |
Convert PAD_DUP to a function Perl_padlist_dup().
assert() that pads are never AvREAL().
Diffstat (limited to 'embed.fnc')
| -rw-r--r-- | embed.fnc | 5 |
1 files changed, 5 insertions, 0 deletions
@@ -2079,6 +2079,11 @@ pd |void |pad_fixup_inner_anons|NN PADLIST *padlist|NN CV *old_cv|NN CV *new_cv pdX |void |pad_push |NN PADLIST *padlist|int depth : Only used in PAD_COMPNAME_TYPE() in op.c pR |HV* |pad_compname_type|const PADOFFSET po +: Used in sv.c +#if defined(USE_ITHREADS) +pR |AV* |padlist_dup |NULLOK AV *const srcpad \ + |NN CLONE_PARAMS *const param +#endif #if defined(PERL_IN_PAD_C) || defined(PERL_DECL_PROT) sd |PADOFFSET|pad_findlex |NN const char *name|NN const CV* cv|U32 seq|int warn \ |