"Space Is a Province of Brazil"

Farewell, hv_store_common. Store is now part of Fetch.
All tests pass. hv.c 15% smaller than when I started all this

p4raw-id: //depot/perl@21771

embed.fnc

@@ -1395,8 +1395,7 @@ Apod	|void	|hv_assert	|HV* tb
 
 #if defined(PERL_IN_HV_C) || defined(PERL_DECL_PROT)
 sM	|SV*	|hv_delete_common|HV* tb|SV* key_sv|const char* key|STRLEN klen|int k_flags|I32 d_flags|U32 hash
-sM	|HE*	|hv_fetch_common|HV* tb|SV* key_sv|const char* key|STRLEN klen|int flags|int action|U32 hash
-sM	|HE*	|hv_store_common|HV* tb|SV* key_sv|const char* key|STRLEN klen|int flags|SV* val|U32 hash
+sM	|HE*	|hv_fetch_common|HV* tb|SV* key_sv|const char* key|STRLEN klen|int flags|int action|SV* val|U32 hash
 #endif
 
 Apd	|void	|hv_clear_placeholders|HV* hb

embed.h

@@ -2150,9 +2150,6 @@
 #ifdef PERL_CORE
 #define hv_fetch_common		S_hv_fetch_common
 #endif
-#ifdef PERL_CORE
-#define hv_store_common		S_hv_store_common
-#endif
 #endif
 #define hv_clear_placeholders	Perl_hv_clear_placeholders
 #define ck_anoncode		Perl_ck_anoncode
@@ -4639,10 +4636,7 @@
 #define hv_delete_common(a,b,c,d,e,f,g)	S_hv_delete_common(aTHX_ a,b,c,d,e,f,g)
 #endif
 #ifdef PERL_CORE
-#define hv_fetch_common(a,b,c,d,e,f,g)	S_hv_fetch_common(aTHX_ a,b,c,d,e,f,g)
-#endif
-#ifdef PERL_CORE
-#define hv_store_common(a,b,c,d,e,f,g)	S_hv_store_common(aTHX_ a,b,c,d,e,f,g)
+#define hv_fetch_common(a,b,c,d,e,f,g,h)	S_hv_fetch_common(aTHX_ a,b,c,d,e,f,g,h)
 #endif
 #endif
 #define hv_clear_placeholders(a)	Perl_hv_clear_placeholders(aTHX_ a)