Change 32776: Change 32760 needed to add a cast to avoid a warning.

[Nicholas Clark]

Change 32776 by [EMAIL PROTECTED] on 2007/12/29 17:35:25

        Change 32760 needed to add a cast to avoid a warning.

Affected files ...

... //depot/perl/av.c#125 edit

Differences ...

==== //depot/perl/av.c#125 (text) ====
Index: perl/av.c
--- perl/av.c#124~32760~        2007-12-29 04:28:14.000000000 -0800
+++ perl/av.c   2007-12-29 09:35:25.000000000 -0800
@@ -977,8 +977,10 @@
     return &(mg->mg_len);
 #else
     if (!mg->mg_ptr) {
+       IV *temp;
        mg->mg_len = IVSIZE;
-       Newxz(mg->mg_ptr, 1, IV);
+       Newxz(temp, 1, IV);
+       mg->mg_ptr = (char *) temp;
     }
     return (IV *)mg->mg_ptr;
 #endif
End of Patch.