projects
/
platform
/
upstream
/
perl.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
9fe4aec
)
Simpler version, and that zeroes the allocated memory
author
Rafael Garcia-Suarez
<rgarciasuarez@gmail.com>
Thu, 19 Apr 2007 17:28:38 +0000
(17:28 +0000)
committer
Rafael Garcia-Suarez
<rgarciasuarez@gmail.com>
Thu, 19 Apr 2007 17:28:38 +0000
(17:28 +0000)
p4raw-id: //depot/perl@30988
mro.c
patch
|
blob
|
history
diff --git
a/mro.c
b/mro.c
index
9a750fe
..
1fa2a37
100644
(file)
--- a/
mro.c
+++ b/
mro.c
@@
-31,7
+31,7
@@
Perl_mro_meta_init(pTHX_ HV* stash)
assert(stash);
assert(HvAUX(stash));
assert(!(HvAUX(stash)->xhv_mro_meta));
- Newx
c(newmeta, sizeof(struct mro_meta), char
, struct mro_meta);
+ Newx
z(newmeta, 1
, struct mro_meta);
HvAUX(stash)->xhv_mro_meta = newmeta;
newmeta->sub_generation = 1;
@@
-58,7
+58,7
@@
Perl_mro_meta_dup(pTHX_ struct mro_meta* smeta, CLONE_PARAMS* param)
assert(smeta);
- Newx
c(newmeta, sizeof(struct mro_meta), char
, struct mro_meta);
+ Newx
z(newmeta, 1
, struct mro_meta);
newmeta->mro_which = smeta->mro_which;
newmeta->sub_generation = smeta->sub_generation;