From: Stas Bekman Date: Thu, 10 Jul 2003 14:19:22 +0000 (-0700) Subject: [comment patch] X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=a782b1cc856c89bf13136b2caa93f6039e826572;p=p5sagit%2Fp5-mst-13.2.git [comment patch] Message-ID: <3F0DD85A.1070902@stason.org> p4raw-id: //depot/perl@20129 --- diff --git a/perl.c b/perl.c index 73f10df..a035a6c 100644 --- a/perl.c +++ b/perl.c @@ -925,7 +925,7 @@ setuid perl scripts securely.\n"); (UV)(Drand01() * (NV)((1 << ((UVSIZE * 8 - RANDBITS))) - 1)); #endif /* RANDBITS < (UVSIZE * 8) */ } -#endif /* USE_HASH_SEED_EXPLICIT */ +#endif /* #ifndef USE_HASH_SEED_EXPLICIT */ if ((s = PerlEnv_getenv("PERL_HASH_SEED_DEBUG"))) PerlIO_printf(Perl_debug_log, "HASH_SEED = %"UVuf"\n", PL_hash_seed);