Change 20008 by [EMAIL PROTECTED] on 2003/07/05 09:10:46
IIRC gcc would complain about if (s = ...).
Affected files ...
... //depot/perl/perl.c#503 edit
Differences ...
==== //depot/perl/perl.c#503 (text) ====
Index: perl/perl.c
--- perl/perl.c#502~20007~ Sat Jul 5 02:09:44 2003
+++ perl/perl.c Sat Jul 5 02:10:46 2003
@@ -926,7 +926,7 @@
#endif /* RANDBITS < (UVSIZE * 8) */
}
#endif /* USE_HASH_SEED_EXPLICIT */
- if (s = PerlEnv_getenv("PERL_HASH_SEED_DEBUG"))
+ if ((s = PerlEnv_getenv("PERL_HASH_SEED_DEBUG")))
PerlIO_printf(Perl_debug_log, "HASH_SEED = %"UVuf"\n",
PL_hash_seed);
}
End of Patch.