https://gcc.gnu.org/bugzilla/show_bug.cgi?id=62049
Steven Bosscher <steven at gcc dot gnu.org> changed:
What |Removed |Added
----------------------------------------------------------------------------
Status|UNCONFIRMED |WAITING
Last reconfirmed| |2014-08-22
CC| |steven at gcc dot gnu.org
Ever confirmed|0 |1
--- Comment #1 from Steven Bosscher <steven at gcc dot gnu.org> ---
(In reply to Paul Martin from comment #0)
Looks like a bug, yes. The intrinsic subroutine appears to be resolved
to _gfortran_system_clock_8. That should be _gfortran_system_clock_4
if your "crate" variable is integer(kind=4).
Can you please compile the following and report back the output here?
----- 8< ----- (t.f90)
PROGRAM clock
IMPLICIT NONE
INTEGER(kind=4) :: crate4
INTEGER(kind=8) :: crate8
CALL system_clock (count_rate = crate4)
WRITE(*,*) crate4
CALL system_clock (count_rate = crate8)
WRITE(*,*) crate8
END PROGRAM clock
----- 8< -----
$ gfortran -Wall t.f90 -fdump-parse-tree
