nobu	2009-07-16 18:43:01 +0900 (Thu, 16 Jul 2009)

  New Revision: 24151

  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi?view=rev&revision=24151

  Log:
    * random.c (fill_random_seed): suppress a warning.

  Modified files:
    trunk/ChangeLog
    trunk/random.c

Index: ChangeLog
===================================================================
--- ChangeLog	(revision 24150)
+++ ChangeLog	(revision 24151)
@@ -1,3 +1,7 @@
+Thu Jul 16 18:42:56 2009  Nobuyoshi Nakada  <nobu@r...>
+
+	* random.c (fill_random_seed): suppress a warning.
+
 Thu Jul 16 18:30:20 2009  Nobuyoshi Nakada  <nobu@r...>
 
 	* hash.c (rb_hash_aset, recursive_hash): rejects recursive hash.
Index: random.c
===================================================================
--- random.c	(revision 24150)
+++ random.c	(revision 24151)
@@ -423,7 +423,7 @@
     seed[0] ^= tv.tv_usec;
     seed[1] ^= (unsigned int)tv.tv_sec;
 #if SIZEOF_TIME_T > SIZEOF_INT
-    seed[0] ^= (unsigned int)(tv.tv_sec >> SIZEOF_INT * CHAR_BIT);
+    seed[0] ^= (unsigned int)((time_t)tv.tv_sec >> SIZEOF_INT * CHAR_BIT);
 #endif
     seed[2] ^= getpid() ^ (n++ << 16);
     seed[3] ^= (unsigned int)(VALUE)&seed;

--
ML: ruby-changes@q...
Info: http://www.atdot.net/~ko1/quickml/