Change 27543 by [EMAIL PROTECTED] on 2006/03/19 19:26:05
Remove a redundant test on mg->mg_ptr. (It had to be non-NULL to get
into this block).
Affected files ...
... //depot/perl/sv.c#1191 edit
Differences ...
==== //depot/perl/sv.c#1191 (text) ====
Index: perl/sv.c
--- perl/sv.c#1190~27538~ 2006-03-17 14:12:27.000000000 -0800
+++ perl/sv.c 2006-03-19 11:26:05.000000000 -0800
@@ -4576,7 +4576,7 @@
Safefree(mg->mg_ptr);
else if (mg->mg_len == HEf_SVKEY)
SvREFCNT_dec((SV*)mg->mg_ptr);
- else if (mg->mg_type == PERL_MAGIC_utf8 && mg->mg_ptr)
+ else if (mg->mg_type == PERL_MAGIC_utf8)
Safefree(mg->mg_ptr);
}
if (mg->mg_flags & MGf_REFCOUNTED)
End of Patch.