Change 33659 by [EMAIL PROTECTED] on 2008/04/07 17:50:31
So why didn't the build break for me? Fix problems spotted by Jerry
Hedden.
Affected files ...
... //depot/perl/hv.c#374 edit
Differences ...
==== //depot/perl/hv.c#374 (text) ====
Index: perl/hv.c
--- perl/hv.c#373~33657~ 2008-04-07 07:45:33.000000000 -0700
+++ perl/hv.c 2008-04-07 10:50:31.000000000 -0700
@@ -2825,9 +2825,9 @@
Copy((char *)value, he->refcounted_he_data + 1, value_len + 1, char);
he->refcounted_he_val.refcounted_he_u_len = value_len;
} else if (value_type == HVrhek_IV) {
- he->refcounted_he_val.refcounted_he_u_iv = SvIVX(value);
+ he->refcounted_he_val.refcounted_he_u_iv = SvIVX((SV *)value);
} else if (value_type == HVrhek_UV) {
- he->refcounted_he_val.refcounted_he_u_uv = SvUVX(value);
+ he->refcounted_he_val.refcounted_he_u_uv = SvUVX((SV *)value);
}
PERL_HASH(hash, key_p, key_len);
End of Patch.
