diff options
| author | Spider Boardman <spider@orb.nashua.nh.us> | 2001-12-08 19:09:23 -0500 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-12-09 15:00:50 +0000 |
| commit | 95f0a2f1ffc68ef908768ec5d39e4102afd28c1e (patch) | |
| tree | 6d6c7cf9004e0c6dae9629f09bab6144eeec3347 /proto.h | |
| parent | 5ec554fbe2d22a7213ac94890d84ed925ba9af4b (diff) | |
| download | perl-95f0a2f1ffc68ef908768ec5d39e4102afd28c1e.tar.gz | |
Re: attributes are broken
Message-Id: <200112090509.AAA02053@Orb.Nashua.NH.US>
p4raw-id: //depot/perl@13543
Diffstat (limited to 'proto.h')
| -rw-r--r-- | proto.h | 5 |
1 files changed, 3 insertions, 2 deletions
@@ -1033,9 +1033,10 @@ STATIC void S_cv_dump(pTHX_ CV *cv); # endif STATIC CV* S_cv_clone2(pTHX_ CV *proto, CV *outside); STATIC bool S_scalar_mod_type(pTHX_ OP *o, I32 type); -STATIC OP * S_my_kid(pTHX_ OP *o, OP *attrs); +STATIC OP * S_my_kid(pTHX_ OP *o, OP *attrs, OP **imopsp); STATIC OP * S_dup_attrlist(pTHX_ OP *o); -STATIC void S_apply_attrs(pTHX_ HV *stash, SV *target, OP *attrs); +STATIC void S_apply_attrs(pTHX_ HV *stash, SV *target, OP *attrs, bool for_my); +STATIC void S_apply_attrs_my(pTHX_ HV *stash, OP *target, OP *attrs, OP **imopsp); # if defined(PL_OP_SLAB_ALLOC) STATIC void* S_Slab_Alloc(pTHX_ int m, size_t sz); # endif |