diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-03-06 02:19:57 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-03-06 02:19:57 +0000 |
commit | 652fde50823786f32d3b9102bfc59f878d44ac15 (patch) | |
tree | 9da57900af3be3667c8dcadd5448506cb7e0cfc2 /op.h | |
parent | c7c425a4f8fa33332c7b6868a1dee31ad0148d28 (diff) | |
download | perl-652fde50823786f32d3b9102bfc59f878d44ac15.tar.gz |
Retract the PMOP cleanup patch: I'm seeing strange core dumps
with oddly familiar stack traces.
p4raw-id: //depot/perl@9054
Diffstat (limited to 'op.h')
-rw-r--r-- | op.h | 19 |
1 files changed, 0 insertions, 19 deletions
@@ -242,11 +242,6 @@ struct pmop { U16 op_pmflags; U16 op_pmpermflags; U8 op_pmdynflags; -#ifdef USE_ITHREADS - char * op_pmstashpv; -#else - HV * op_pmstash; -#endif }; #define PMdf_USED 0x01 /* pm has been used once already */ @@ -276,20 +271,6 @@ struct pmop { /* mask of bits stored in regexp->reganch */ #define PMf_COMPILETIME (PMf_MULTILINE|PMf_SINGLELINE|PMf_LOCALE|PMf_FOLD|PMf_EXTENDED) -#ifdef USE_ITHREADS -# define PmopSTASHPV(o) ((o)->op_pmstashpv) -# define PmopSTASHPV_set(o,pv) ((o)->op_pmstashpv = ((pv) ? savepv(pv) : Nullch)) -# define PmopSTASH(o) (PmopSTASHPV(o) \ - ? gv_stashpv(PmopSTASHPV(o),GV_ADD) : Nullhv) -# define PmopSTASH_set(o,hv) PmopSTASHPV_set(o, (hv) ? HvNAME(hv) : Nullch) -#else -# define PmopSTASH(o) ((o)->op_pmstash) -# define PmopSTASH_set(o,hv) ((o)->op_pmstash = (hv)) -# define PmopSTASHPV(o) (PmopSTASH(o) ? HvNAME(PmopSTASH(o)) : Nullch) - /* op_pmstash is not refcounted */ -# define PmopSTASHPV_set(o,pv) PmopSTASH_set((o), gv_stashpv(pv,GV_ADD)) -#endif - struct svop { BASEOP SV * op_sv; |