develooper Front page | perl.perl5.porters | Postings from October 2003

[PATCH] Internals::hash_seed() returns wrong value

Thread Next
Jan Dubois
October 12, 2003 22:12
[PATCH] Internals::hash_seed() returns wrong value
Message ID:
If you compile Perl with e.g. PERL_HASH_SEED=12345 then PERL_HASH() in
hv.h will use this constant and not use PL_hash_seed at all.  I think
Internals::hash_seed() (and Hash::Util::hash_seed()) are supposed to
return the value used by PERL_HASH() and not the value stored in


Index: universal.c
--- universal.c.~1~    Sun Oct 12 21:57:54 2003
+++ universal.c        Sun Oct 12 21:57:54 2003
@@ -723,6 +723,6 @@
     /* Using dXSARGS would also have dITEM and dSP,
      * which define 2 unused local variables.  */
     dMARK; dAX;
-    XSRETURN_UV(PL_hash_seed);

End of Patch.

Thread Next Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at | Group listing | About