This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
fix the name shown in PERL_HASH_SEED_DEBUG for stadtx
authorYves Orton <demerphq@gmail.com>
Tue, 23 Apr 2019 17:05:23 +0000 (19:05 +0200)
committerYves Orton <demerphq@gmail.com>
Tue, 23 Apr 2019 17:05:23 +0000 (19:05 +0200)
hv_func.h

index 111de93..a519839 100644 (file)
--- a/hv_func.h
+++ b/hv_func.h
@@ -47,7 +47,7 @@
 # define __PERL_HASH_SEED_STATE(seed,state) S_perl_siphash_seed_state(seed,state)
 # define __PERL_HASH_WITH_STATE(state,str,len) S_perl_hash_siphash_1_3_with_state((state),(U8*)(str),(len))
 #elif defined(PERL_HASH_FUNC_STADTX)
 # define __PERL_HASH_SEED_STATE(seed,state) S_perl_siphash_seed_state(seed,state)
 # define __PERL_HASH_WITH_STATE(state,str,len) S_perl_hash_siphash_1_3_with_state((state),(U8*)(str),(len))
 #elif defined(PERL_HASH_FUNC_STADTX)
-# define __PERL_HASH_FUNC "STATDX"
+# define __PERL_HASH_FUNC "STADTX"
 # define __PERL_HASH_SEED_BYTES 16
 # define __PERL_HASH_STATE_BYTES 32
 # define __PERL_HASH_SEED_STATE(seed,state) stadtx_seed_state(seed,state)
 # define __PERL_HASH_SEED_BYTES 16
 # define __PERL_HASH_STATE_BYTES 32
 # define __PERL_HASH_SEED_STATE(seed,state) stadtx_seed_state(seed,state)