[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 (file)
--- 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);