------- Comment #1 from kargl at gcc dot gnu dot org 2008-10-30 20:20 ------- (In reply to comment #0) > Fortran 2003 allows all kinds for arguments (-> please re-check).
Not according to my draft of F2003. SIZE (optional) shall be scalar and of type default integer. It is an INTENT (OUT) argument. It is assigned the number N of integers that the processor uses to hold the value of the seed. > For i8 the library already contains: random_seed_i8. How to handle i16? > > Note: One still needs to support calls with different integer types, esp. if > one needs to modify the variable (-> convert back). [Unless there can be only > one argument at a time.] According th F2003 standard: Arguments. There shall either be exactly one or no arguments present. > Additionally, the front end currently rejects i8: > > Error: 'size' argument of 'random_seed' intrinsic at (1) must be of kind 4 > > 1 > Error: 'put' argument of 'random_seed' intrinsic at (1) must be of kind 4 This is the correct behavior. -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=37961
