https://gcc.gnu.org/bugzilla/show_bug.cgi?id=64432

Joost VandeVondele <Joost.VandeVondele at mat dot ethz.ch> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |Joost.VandeVondele at mat dot 
ethz
                   |                            |.ch

--- Comment #8 from Joost VandeVondele <Joost.VandeVondele at mat dot ethz.ch> 
---
also in cp2k we use separate calls for getting the count_rate, count_max and
count.

I think as long as they are the same kind there should be no problem. *8
arguments resolve to the _8 version and *4 to the _4 version. Both versions
ideally have different resolution. 

I would argue that allowing a single call to system_clock to have integer
arguments of different kind is somewhat of a bug in the standard, possibly
worthy of a compiler warning. In that case, I would resolve return -HUGE,0,0
i.e. system_clock of this version not supported (also allowed by the standard).

Actually, the latter seems like a good idea for integer*1 and integer*2
system_clock calls as well, since the current version is non-conforming. 

> cat test.f90
INTEGER*1 :: count,count_max,count_rate
DO
  CALL SYSTEM_CLOCK(count,count_max,count_rate)
  write(6,*) count,count_max,count_rate
ENDDO

END
> ./a.out | head
  -14  -24   -1
  -13  -24   -1

Reply via email to