perl 5.003_01: mg.c

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

diff --git a/sv.h b/sv.h
index c586de4..5b3a72a 100644 (file)
--- a/sv.h
+++ b/sv.h
@@ -129,6 +129,8 @@ struct io {
 #define SVpbm_CASEFOLD 0x40000000
 #define SVpbm_TAIL     0x20000000
 
+#define SVphv_SHAREKEYS 0x20000000     /* keys live on shared string table */
+
 #ifdef OVERLOAD
 #define SVpgv_AM        0x40000000
 /* #define SVpgv_badAM     0x20000000 */