This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Move the negative key -> utf8 flag conversion out to hv_delete
[perl5.git] / perlapi.h
index ac14cf9..c761540 100644 (file)
--- a/perlapi.h
+++ b/perlapi.h
@@ -398,10 +398,6 @@ END_EXTERN_C
 #define PL_multi_start         (*Perl_Imulti_start_ptr(aTHX))
 #undef  PL_multiline
 #define PL_multiline           (*Perl_Imultiline_ptr(aTHX))
-#undef  PL_new_hash_seed
-#define PL_new_hash_seed       (*Perl_Inew_hash_seed_ptr(aTHX))
-#undef  PL_new_hash_seed_set
-#define PL_new_hash_seed_set   (*Perl_Inew_hash_seed_set_ptr(aTHX))
 #undef  PL_nexttoke
 #define PL_nexttoke            (*Perl_Inexttoke_ptr(aTHX))
 #undef  PL_nexttype
@@ -494,6 +490,10 @@ END_EXTERN_C
 #define PL_regex_pad           (*Perl_Iregex_pad_ptr(aTHX))
 #undef  PL_regex_padav
 #define PL_regex_padav         (*Perl_Iregex_padav_ptr(aTHX))
+#undef  PL_rehash_seed
+#define PL_rehash_seed         (*Perl_Irehash_seed_ptr(aTHX))
+#undef  PL_rehash_seed_set
+#define PL_rehash_seed_set     (*Perl_Irehash_seed_set_ptr(aTHX))
 #undef  PL_replgv
 #define PL_replgv              (*Perl_Ireplgv_ptr(aTHX))
 #undef  PL_rsfp