This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Hash lookup of constant strings optimization:
[perl5.git] / embed.h
diff --git a/embed.h b/embed.h
index ced6e9d..9bd72ad 100644 (file)
--- a/embed.h
+++ b/embed.h
@@ -1,4 +1,4 @@
-/* !!!!!!!   DO NOT EDIT THIS FILE   !!!!!!! 
+/* !!!!!!!   DO NOT EDIT THIS FILE   !!!!!!!
    This file is built by embed.pl from data in embed.pl, pp.sym, intrpvar.h,
    perlvars.h and thrdvar.h.  Any changes made here will be lost!
 */
 #define newSVnv                        Perl_newSVnv
 #define newSVpv                        Perl_newSVpv
 #define newSVpvn               Perl_newSVpvn
+#define newSVpvn_share         Perl_newSVpvn_share
 #define newSVpvf               Perl_newSVpvf
 #define vnewSVpvf              Perl_vnewSVpvf
 #define newSVrv                        Perl_newSVrv
 #define newSVnv(a)             Perl_newSVnv(aTHX_ a)
 #define newSVpv(a,b)           Perl_newSVpv(aTHX_ a,b)
 #define newSVpvn(a,b)          Perl_newSVpvn(aTHX_ a,b)
+#define newSVpvn_share(a,b,c)  Perl_newSVpvn_share(aTHX_ a,b,c)
 #define vnewSVpvf(a,b)         Perl_vnewSVpvf(aTHX_ a,b)
 #define newSVrv(a,b)           Perl_newSVrv(aTHX_ a,b)
 #define newSVsv(a)             Perl_newSVsv(aTHX_ a)
 #define newSVpv                        Perl_newSVpv
 #define Perl_newSVpvn          CPerlObj::Perl_newSVpvn
 #define newSVpvn               Perl_newSVpvn
+#define Perl_newSVpvn_share    CPerlObj::Perl_newSVpvn_share
+#define newSVpvn_share         Perl_newSVpvn_share
 #define Perl_newSVpvf          CPerlObj::Perl_newSVpvf
 #define newSVpvf               Perl_newSVpvf
 #define Perl_vnewSVpvf         CPerlObj::Perl_vnewSVpvf