diff options
| author | Ruslan Zakirov <ruz@bestpractical.com> | 2013-03-25 05:31:35 +0400 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2013-06-30 11:43:41 -0700 |
| commit | a38ab4751f3c0df44dc09e4d685a2637e93c9778 (patch) | |
| tree | 81b350cb112e5aa7f0e659dbffd736e86bf0358a /embedvar.h | |
| parent | c106c2be8b83eeb3799c9f2127c5030a7a04115a (diff) | |
| download | perl-a38ab4751f3c0df44dc09e4d685a2637e93c9778.tar.gz | |
SV_CONST(name) and PL_sv_consts
SV_CONST(XXX) returns SV* that contains "XXX" string.
SVs are built on demand and stored in interp's structure
for re-use. All SVs have precomputed hash value.
Creates SVs on demand, we don't want 35 SV created during
compile time or cloned during thread creation.
Diffstat (limited to 'embedvar.h')
| -rw-r--r-- | embedvar.h | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/embedvar.h b/embedvar.h index 808d497cae..0c34c0f3c6 100644 --- a/embedvar.h +++ b/embedvar.h @@ -301,6 +301,7 @@ #define PL_subline (vTHX->Isubline) #define PL_subname (vTHX->Isubname) #define PL_sv_arenaroot (vTHX->Isv_arenaroot) +#define PL_sv_consts (vTHX->Isv_consts) #define PL_sv_count (vTHX->Isv_count) #define PL_sv_no (vTHX->Isv_no) #define PL_sv_objcount (vTHX->Isv_objcount) |