Move the location of the definition of the arena slot used for pte

into sv.h, to keep it in one central place.
Change it to use SVt_RV. (Having SVt_IV for real use will be useful.
SVt_RV has no body, and doesn't pretend to have one, so it is spare.)

p4raw-id: //depot/perl@26148

diff --git a/sv.c b/sv.c
index e611ba3..286b2e1 100644 (file)
--- a/sv.c
+++ b/sv.c
@@ -1112,7 +1112,6 @@ Perl_report_uninit(pTHX_ SV* uninit_sv)
   of the unused body-slots for PTEs, then use it in those (2) PTE
   contexts below (line ~10k)
 */
-#define PTE_SVSLOT     SVt_IV
 
 STATIC void *
 S_more_bodies (pTHX_ size_t size, svtype sv_type)

diff --git a/sv.h b/sv.h
index c9cf0fe..a40d3b5 100644 (file)
--- a/sv.h
+++ b/sv.h
@@ -63,6 +63,9 @@ typedef enum {
        SVt_LAST        /* keep last in enum. used to size arrays */
 } svtype;
 
+#ifdef PERL_IN_SV_C
+#define PTE_SVSLOT     SVt_RV
+#endif
 
 /* typedefs to eliminate some typing */
 typedef struct he HE;