diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 1998-10-15 03:09:58 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-10-15 03:09:58 +0000 |
commit | 1cfa4ec74d4933da0d98282eed6171cc7ac307b6 (patch) | |
tree | 16e2d6216053294709570ec219063df3229545f4 /op.c | |
parent | 1e2878e610af032604518a9feca8663968d7369a (diff) | |
download | perl-1cfa4ec74d4933da0d98282eed6171cc7ac307b6.tar.gz |
check in all confperl changes as of change#1964 into cfgperl
p4raw-link: @1964 on //depot/confperl: 2d85315bb227e0962a693eaaadc3f40ca2fbf49b
p4raw-id: //depot/cfgperl@1971
Diffstat (limited to 'op.c')
-rw-r--r-- | op.c | 5 |
1 files changed, 3 insertions, 2 deletions
@@ -3832,9 +3832,10 @@ newSUB(I32 floor, OP *o, OP *proto, OP *block) CvSTASH(cv) = PL_curstash; #ifdef USE_THREADS CvOWNER(cv) = 0; - if (!CvMUTEXP(cv)) + if (!CvMUTEXP(cv)) { New(666, CvMUTEXP(cv), 1, perl_mutex); - MUTEX_INIT(CvMUTEXP(cv)); + MUTEX_INIT(CvMUTEXP(cv)); + } #endif /* USE_THREADS */ if (ps) |