diff options
author | Nick Ing-Simmons <nik@tiuk.ti.com> | 2002-03-04 14:42:09 +0000 |
---|---|---|
committer | Nick Ing-Simmons <nik@tiuk.ti.com> | 2002-03-04 14:42:09 +0000 |
commit | 24140e009b1b0a7cb78bf9b74be60f7a30a12452 (patch) | |
tree | 8dc79fd67053ffbdbc7f5bf2219f0b9c5132aa55 /ext | |
parent | c745bbe4853f5b4596f52161550f4437b0344e84 (diff) | |
download | perl-24140e009b1b0a7cb78bf9b74be60f7a30a12452.tar.gz |
Remove debugging assert
p4raw-id: //depot/perlio@14995
Diffstat (limited to 'ext')
-rw-r--r-- | ext/threads/shared/shared.xs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/ext/threads/shared/shared.xs b/ext/threads/shared/shared.xs index 5f1b3407dc..ee05c574b0 100644 --- a/ext/threads/shared/shared.xs +++ b/ext/threads/shared/shared.xs @@ -452,7 +452,9 @@ int sharedsv_scalar_mg_free(pTHX_ SV *sv, MAGIC *mg) { shared_sv *shared = (shared_sv *) mg->mg_ptr; +#if 0 assert (SvREFCNT(SHAREDSvPTR(shared)) < 1000); +#endif Perl_sharedsv_free(aTHX_ shared); return 0; } |