This is the mail archive of the
fortran@gcc.gnu.org
mailing list for the GNU Fortran project.
Re: [gfortran] Implementation SYSTEM_CLOCK intrinsic subroutine
On Friday 14 May 2004 17:26, Steve Kargl wrote:
> On Fri, May 14, 2004 at 01:34:19PM +0200, Tobias Schl?ter wrote:
> > Steve Kargl wrote:
> > > program a ! system_clock requires at least 1 of its
> > > call system_clock ! optional arguments to be present.
> > > end program a
> >
> > I don't see that this is true. The standard says that each of these
> > arguments are optional, and there is no constraint that one be present,
> > as in the case of SELECTED_REAL_KIND for instance. Of course the call
> > doesn't make much sense if no arguments are given.
>
> Yikes. You are right. The standard does not mandate that
> one of the optional arguments is required. In fact, NAG's
> compiler will compile the above without a problem, and the
> executable runs. I think I'll need to update the resolving
> routine and if no arguments are present, then point at a
> __system_clock_nop internal routine.
Why bother? The existing routine should do the right thing (ie nothing).
Paul