From 008fb0c0b128e68050936412d62bf4def14fc864 Mon Sep 17 00:00:00 2001 From: Nicholas Clark Date: Mon, 3 Nov 2003 06:46:48 +0000 Subject: s/new_hash/rehash/g (Stas suggested a better name) p4raw-id: //depot/perl@21638 --- universal.c | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) (limited to 'universal.c') diff --git a/universal.c b/universal.c index e877b31b28..83df6c5007 100644 --- a/universal.c +++ b/universal.c @@ -188,7 +188,7 @@ XS(XS_Internals_hv_clear_placehold); XS(XS_PerlIO_get_layers); XS(XS_Regexp_DESTROY); XS(XS_Internals_hash_seed); -XS(XS_Internals_new_hash_seed); +XS(XS_Internals_rehash_seed); XS(XS_Internals_HvREHASH); void @@ -234,8 +234,7 @@ Perl_boot_core_UNIVERSAL(pTHX) XS_PerlIO_get_layers, file, "*;@"); newXS("Regexp::DESTROY", XS_Regexp_DESTROY, file); newXSproto("Internals::hash_seed",XS_Internals_hash_seed, file, ""); - newXSproto("Internals::new_hash_seed",XS_Internals_new_hash_seed, file, - ""); + newXSproto("Internals::rehash_seed",XS_Internals_rehash_seed, file, ""); newXSproto("Internals::HvREHASH", XS_Internals_HvREHASH, file, "\\%"); } @@ -921,12 +920,12 @@ XS(XS_Internals_hash_seed) XSRETURN_UV(PERL_HASH_SEED); } -XS(XS_Internals_new_hash_seed) +XS(XS_Internals_rehash_seed) { /* Using dXSARGS would also have dITEM and dSP, * which define 2 unused local variables. */ dMARK; dAX; - XSRETURN_UV(PL_new_hash_seed); + XSRETURN_UV(PL_rehash_seed); } XS(XS_Internals_HvREHASH) /* Subject to change */ -- cgit v1.2.1