Random seed initialization

[Brad Finney]

For what it might be worth, here is the output from a MinGW32 version of 4.8

gfortran -v
Using built-in specs.
COLLECT_GCC=gfortran
COLLECT_LTO_WRAPPER=c:/program files 
(x86)/gfortran/bin/../libexec/gcc/mingw32/4.8.0/lto-wrapper.exe
Target: mingw32
Configured with: ../gcc-trunk/configure --prefix=/mingw 
--enable-languages=c,fortran,lto --with-gmp=/home/brad/gfortran/
dependencies --disable-werror --enable-threads --enable-nls 
--build=i586-pc-mingw32 --enable-libgomp --enable-shared --d
isable-win32-registry --with-dwarf2 --disable-sjlj-exceptions 
--enable-lto --build=mingw32 --enable-version-specific-run
time-libs
Thread model: win32
gcc version 4.8.0 20130302 (experimental) [trunk revision 196403] (GCC)

sysclock-testcase
   1714685993        1000  2147483647
      1365366802472579              1000000  9223372036854775807