concat interacts badly with magic

[p5sagit/p5-mst-13.2.git] / sv.h

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