diff options
| author | Malcolm Beattie <mbeattie@sable.ox.ac.uk> | 1997-11-05 17:18:18 +0000 |
|---|---|---|
| committer | Malcolm Beattie <mbeattie@sable.ox.ac.uk> | 1997-11-05 17:18:18 +0000 |
| commit | 554b3ecafd2a8f619792c82298bc621b9e48a923 (patch) | |
| tree | c3138e05a93a7e87ca8c5599d1f70fc3d0493a73 /ext/Thread | |
| parent | ea61227d0482867af3a13c7e6042a17aac4b4d4f (diff) | |
| download | perl-554b3ecafd2a8f619792c82298bc621b9e48a923.tar.gz | |
Per-thread magicals mostly working (and localisable). Now getting
intermittent occasional "Use of uninitialized value" warnings
which may be due to some op flag black magic I've broken.
p4raw-id: //depot/perl@204
Diffstat (limited to 'ext/Thread')
| -rw-r--r-- | ext/Thread/Thread.xs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/ext/Thread/Thread.xs b/ext/Thread/Thread.xs index a6386176ff..1ef3ebc6fc 100644 --- a/ext/Thread/Thread.xs +++ b/ext/Thread/Thread.xs @@ -143,6 +143,8 @@ void *arg; SvREFCNT_dec(curstack); #endif SvREFCNT_dec(cvcache); + SvREFCNT_dec(thr->magicals); + SvREFCNT_dec(thr->specific); Safefree(markstack); Safefree(scopestack); Safefree(savestack); |