summaryrefslogtreecommitdiff
path: root/toke.c
diff options
context:
space:
mode:
authorMalcolm Beattie <mbeattie@sable.ox.ac.uk>1997-09-09 15:04:26 +0000
committerMalcolm Beattie <mbeattie@sable.ox.ac.uk>1997-09-09 15:04:26 +0000
commit77a005ab9f9f951511e847aba59fbf2ab1bb17e3 (patch)
tree238d369e377ec323ac774f3e2fcdd6e61a4a3e7b /toke.c
parent1f5895a1c4980727163b32b39405e3fc770ace84 (diff)
downloadperl-77a005ab9f9f951511e847aba59fbf2ab1bb17e3.tar.gz
Rewrite synchronisation of subs/methods and add attrs
extension for specifying 'locked' and 'method' attributes. p4raw-id: //depot/perl@56
Diffstat (limited to 'toke.c')
-rw-r--r--toke.c4
1 files changed, 0 insertions, 4 deletions
diff --git a/toke.c b/toke.c
index dc2c2a2bf2..78ae386967 100644
--- a/toke.c
+++ b/toke.c
@@ -5243,8 +5243,6 @@ U32 flags;
CvOWNER(compcv) = 0;
New(666, CvMUTEXP(compcv), 1, perl_mutex);
MUTEX_INIT(CvMUTEXP(compcv));
- New(666, CvCONDP(compcv), 1, perl_cond);
- COND_INIT(CvCONDP(compcv));
#endif /* USE_THREADS */
comppadlist = newAV();
@@ -5258,8 +5256,6 @@ U32 flags;
CvOWNER(compcv) = 0;
New(666, CvMUTEXP(compcv), 1, perl_mutex);
MUTEX_INIT(CvMUTEXP(compcv));
- New(666, CvCONDP(compcv), 1, perl_cond);
- COND_INIT(CvCONDP(compcv));
#endif /* USE_THREADS */
return oldsavestack_ix;