This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Change 31987 forgot to re-run embed.pl
authorNicholas Clark <nick@ccl4.org>
Fri, 28 Sep 2007 07:32:28 +0000 (07:32 +0000)
committerNicholas Clark <nick@ccl4.org>
Fri, 28 Sep 2007 07:32:28 +0000 (07:32 +0000)
p4raw-id: //depot/perl@31990

embedvar.h
perlapi.h

index 93ba32e..0d3d347 100644 (file)
 #define PL_sort_RealCmp                (vTHX->Isort_RealCmp)
 #define PL_sortcop             (vTHX->Isortcop)
 #define PL_sortstash           (vTHX->Isortstash)
+#define PL_spare_510           (vTHX->Ispare_510)
 #define PL_splitstr            (vTHX->Isplitstr)
 #define PL_srand_called                (vTHX->Isrand_called)
 #define PL_stack_base          (vTHX->Istack_base)
 #define PL_Isort_RealCmp       PL_sort_RealCmp
 #define PL_Isortcop            PL_sortcop
 #define PL_Isortstash          PL_sortstash
+#define PL_Ispare_510          PL_spare_510
 #define PL_Isplitstr           PL_splitstr
 #define PL_Isrand_called       PL_srand_called
 #define PL_Istack_base         PL_stack_base
index dfe593b..33ecbba 100644 (file)
--- a/perlapi.h
+++ b/perlapi.h
@@ -592,6 +592,8 @@ END_EXTERN_C
 #define PL_sortcop             (*Perl_Isortcop_ptr(aTHX))
 #undef  PL_sortstash
 #define PL_sortstash           (*Perl_Isortstash_ptr(aTHX))
+#undef  PL_spare_510
+#define PL_spare_510           (*Perl_Ispare_510_ptr(aTHX))
 #undef  PL_splitstr
 #define PL_splitstr            (*Perl_Isplitstr_ptr(aTHX))
 #undef  PL_srand_called