diff options
author | Nicholas Clark <nick@ccl4.org> | 2006-03-05 17:47:23 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2006-03-05 17:47:23 +0000 |
commit | acda4c6a827049c821c192cce45f6c5299c45783 (patch) | |
tree | 02139f3a8a9ace095fd0c53c69b38f1629698203 /sv.h | |
parent | 7459f06bb5d2ce197f3e9fd16e46ba87a2ab6995 (diff) | |
download | perl-acda4c6a827049c821c192cce45f6c5299c45783.tar.gz |
Use a HEK to store the GV's name, rather than a malloc()ed string.
Saves 1 word in each GV (no more strlen), and will also save the memory
used by the string itself, as the HEK will exist already due to the
key used by the symbol table for this GV.
p4raw-id: //depot/perl@27379
Diffstat (limited to 'sv.h')
-rw-r--r-- | sv.h | 6 |
1 files changed, 2 insertions, 4 deletions
@@ -487,8 +487,7 @@ struct xpvlv { HV* xmg_stash; /* class package */ /* a full glob fits into this */ - char* xgv_name; - STRLEN xgv_namelen; + HEK * xgv_namehek; STRLEN xlv_targoff; STRLEN xlv_targlen; @@ -516,8 +515,7 @@ struct xpvgv { } xmg_u; HV* xmg_stash; /* class package */ - char* xgv_name; - STRLEN xgv_namelen; + HEK * xgv_namehek; }; struct xpvbm { |