malloc "fix" in change#5346 coredumps on HP-UX, revert

p4raw-link: @5346 on //depot/perl: 0f297bd804f61ea0809c358c647840f86e05b2dc

p4raw-id: //depot/perl@5360

diff --git a/malloc.c b/malloc.c
index 1a048f7..f27df88 100644 (file)
--- a/malloc.c
+++ b/malloc.c
@@ -1752,8 +1752,7 @@ Perl_realloc(void *mp, size_t nbytes)
                nmalloc[bucket]--;
                nmalloc[pow * BUCKETS_PER_POW2]++;
 #endif             
-               ((union overhead *)(cp - M_OVERHEAD))->ov_index
-                 = pow * BUCKETS_PER_POW2; /* Fill index. */
+               *(cp - M_OVERHEAD) = pow * BUCKETS_PER_POW2; /* Fill index. */
                MALLOC_UNLOCK;
                goto inplace_label;
            } else {