re PR fortran/64432 (SYSTEM_CLOCK(COUNT_RATE=rate) wrong result for integer(4)::rate)
commit65263c1f70b4e589e70c35c244a7f6294e5c4c1e
authorJerry DeLisle <jvdelisle@gcc.gnu.org>
Tue, 17 Mar 2015 01:01:54 +0000 (17 01:01 +0000)
committerJerry DeLisle <jvdelisle@gcc.gnu.org>
Tue, 17 Mar 2015 01:01:54 +0000 (17 01:01 +0000)
tree9791d46b3c1a833057bfc1cc6c6ad00071453cbb
parenta5858a3dfff043b6693ab4b59ee5a41d3e20bad7
re PR fortran/64432 (SYSTEM_CLOCK(COUNT_RATE=rate) wrong result for integer(4)::rate)

2015-03-16  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

PR fortran/64432
*trans-intrinisic.c (conv_intrinsic_system_clock): Check the
smallest kind passed in user arguments and hardcode tesults for
KIND=1 or KIND=2 to indicate no clock available.

From-SVN: r221471
gcc/fortran/ChangeLog
gcc/fortran/trans-intrinsic.c