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 | a0c69c62cb3acb4a8703775f52717bf203c444d5 (patch) | |
| tree | 8dc79fd67053ffbdbc7f5bf2219f0b9c5132aa55 | |
| parent | fd2fe9917af611594ca5796e35b562970f965672 (diff) | |
| download | perl-a0c69c62cb3acb4a8703775f52717bf203c444d5.tar.gz | |
Remove debugging assert
p4raw-id: //depot/perlio@14995
| -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; } |