summaryrefslogtreecommitdiff
path: root/ext
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2002-03-04 17:11:19 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2002-03-04 17:11:19 +0000
commiteb31b78e700ea0345396e27142faff79fd75f356 (patch)
treeb2e76ca4fe6e39fd633082d202794c4321259725 /ext
parentda687c2af97fa1d5b33113fe1498d87de2b43b2a (diff)
downloadperl-eb31b78e700ea0345396e27142faff79fd75f356.tar.gz
Integrate perlio:
[ 15002] Win32 tweak [ 14999] Win32 hack [ 14995] Remove debugging assert p4raw-link: @15002 on //depot/perlio: 330f1a50c5d35c91987f1aef437dcb98bb1db640 p4raw-link: @14999 on //depot/perlio: aa0955498d45bb8096ef3cae16377877c15810a6 p4raw-link: @14995 on //depot/perlio: 24140e009b1b0a7cb78bf9b74be60f7a30a12452 p4raw-id: //depot/perl@15008
Diffstat (limited to 'ext')
-rw-r--r--ext/threads/shared/shared.xs2
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;
}