Path: utzoo!attcan!uunet!tut.cis.ohio-state.edu!husc6!bloom-beacon!usc!elroy.jpl.nasa.gov!decwrl!sgi!calvin@dinkum.wpd.sgi.com From: calvin@dinkum.wpd.sgi.com (Calvin H. Vu) Newsgroups: comp.sys.sgi Subject: Re: f77 bug Message-ID: <40168@sgi.SGI.COM> Date: 14 Aug 89 16:59:32 GMT References: <52*finnd@vax.runit.unit.uninett> Sender: daemon@sgi.SGI.COM Organization: Silicon Graphics, Inc., Mountain View, CA Lines: 31 In article <52*finnd@vax.runit.unit.uninett>, finnd%vax.runit.unit.uninett@NAC.NO (Finn Drablos) writes: > I am using a 4D/70GT with IRIX 3.1D. When I try to compile the following > short fortran program with f77 > program test > integer i,time > i=time() > write(*,*) i > stop > end > all I get is "bad number of arguments to intrinsic time". But according > to the documentation there should be no arguments to time .... Is there > a bug in f77, or am I doing something stupid ? If there is a bug, is > there an easy way around this problem ? > MIPS introduced an intrinsic version of time() in their 1.31 release for VMS compatibility. To use the older library version of time() you need to add 'EXTERNAL TIME' in the program unit that uses it. This is documented in the 3.1 release notes although our man pages could not keep up with these changes. I'll make a note to make sure that the man page for time() will reflect both versions. Thanks for reminding us. > ================== > Finn Drablos PHONE +47 7 597710 FAX +47 7 597708 > MR-Senteret, SINTEF MHS(EAN) : finnd@vax.runit.unit.uninett > N-7034 TRONDHEIM, NORWAY EARN/BITNET : drabloes@norunit > ----------------------------------------------------------------------- Calvin Vu Silicon Graphics, calvin@sgi.sgi.com