https://gcc.gnu.org/bugzilla/show_bug.cgi?id=77400
kargl at gcc dot gnu.org changed:
What |Removed |Added
----------------------------------------------------------------------------
Priority|P3 |P4
Status|UNCONFIRMED |WAITING
Last reconfirmed| |2016-08-29
CC| |kargl at gcc dot gnu.org
Ever confirmed|0 |1
Severity|normal |minor
--- Comment #1 from kargl at gcc dot gnu.org ---
(In reply to Sergey from comment #0)
> Starting from 12th Aug 2016, fortran compfails on random_seed(PUT=seed) as
> follows if seed size is less than 33 (with expected size 12 which had been
> working so far as long as in release branches) :
>
> sh-4.3$ gfortran ttt2.f90 -o ttt2
> ttt2.f90:14:30:
>
> call random_seed (PUT=seed)
> 1
> Error: Size of 'put' argument of 'random_seed' intrinsic at (1) too small
> (24/33)
Yes, the internals of random_number/random_seed have changed.
> It's interesting that random_seed(SIZE=.. ) still report that expected seed
> size is 12, not 33.
This suggests that you are linking against the wrong libgfortran.
% gfortran6 -o z a.f90 && ./z
12
% gfortran7 -o z a.f90 && ./z
33
