Fortran 2003 allows all kinds for arguments (-> please re-check). 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.] 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 -- Summary: [F2003] random_seed - allow integer(8) for the arguments Product: gcc Version: 4.4.0 Status: UNCONFIRMED Severity: normal Priority: P3 Component: fortran AssignedTo: unassigned at gcc dot gnu dot org ReportedBy: burnus at gcc dot gnu dot org http://gcc.gnu.org/bugzilla/show_bug.cgi?id=37961