[Bug fortran/17893] New: etime complains when called as a subroutine

[Bug fortran/17893] New: etime complains when called as a subroutine

[barrowes at alum dot mit dot edu]

Calls to etime fail when etime is called as a subroutine, but succeeds when
called as a function:

program zztest
 real x
 real times(2)
 call etime(times)
 x=100
 do i=1,1000000
  x=x-1.0/x
 end do
 print *,'x=',x
 call etime(times)
 x=times(1)
 print *,'x=',x
 print *,'times=',times
end program zztest

> gfortran -o zztest zztest.f90
 In file zztest.f90:6

 call etime(times)
                 1
Error: Missing actual argument 'time' in call to 'etime' at (1)
 In file zztest.f90:16

 call etime(times)
                 1
Error: Missing actual argument 'time' in call to 'etime' at (1)
>

Intel and g95 have no problem and return reasonable results.

Ben

-- 
           Summary: etime complains when called as a subroutine
           Product: gcc
           Version: 4.0.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: barrowes at alum dot mit dot edu
                CC: gcc-bugs at gcc dot gnu dot org


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=17893

[Bug fortran/17893] etime complains when called as a subroutine

[pinskia at gcc dot gnu dot org]

------- Additional Comments From pinskia at gcc dot gnu dot org  2004-10-08 19:14 -------
I think the subroutine is to provide compatiabliy with G77 in which it takes two arguments
See <http://gcc.gnu.org/onlinedocs/gcc-3.4.1/g77/ETime-Intrinsic--subroutine-.html>
and <http://gcc.gnu.org/onlinedocs/gcc-3.4.1/g77/ETime-Intrinsic--function-
.html>.

So this is invalid.

-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |RESOLVED
         Resolution|                            |INVALID


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=17893