Literal constants where the kind parameter isn't a constant

pgfortran 17.10 does not reject the following program:

  use, intrinsic :: iso_fortran_env, only :
  print*, 1_int16
end

This has been logged as TPR 25083.

dave