Use %^H instead of $^H for the assertions pragma

p4raw-id: //depot/perl@28808

1 files changed, 3 insertions, 3 deletions

diff --git a/perl.h b/perl.h
index 665324a0df..9ae17aa2ef 100644
--- a/perl.h
+++ b/perl.h
@@ -4281,9 +4281,9 @@ enum {		/* pass one of these to get_vtbl */
 #define HINT_FILETEST_ACCESS	0x00400000 /* filetest pragma */
 #define HINT_UTF8		0x00800000 /* utf8 pragma */
 
-/* assertions pragma */
-#define HINT_ASSERTING          0x01000000
-#define HINT_ASSERTIONSSEEN     0x02000000
+/* assertions pragma, stored in $^H{assertions} */
+#define HINT_ASSERTING          0x00000001
+#define HINT_ASSERTIONSSEEN     0x00000002
 
 /* The following are stored in $^H{sort}, not in PL_hints */
 #define HINT_SORT_SORT_BITS	0x000000FF /* allow 256 different ones */