Path: utzoo!utgpu!news-server.csri.toronto.edu!bonnie.concordia.ca!uunet!mcsun!hp4nl!cwi.nl!dik
From: dik@cwi.nl (Dik T. Winter)
Newsgroups: comp.lang.fortran
Subject: Re: DEC System 5000 f77 bug
Message-ID: <3627@charon.cwi.nl>
Date: 3 Jun 91 12:32:31 GMT
References: <1694@usage.csd.unsw.oz.au>
Sender: news@cwi.nl
Organization: CWI, Amsterdam
Lines: 17

In article <1694@usage.csd.unsw.oz.au> michaelg@hydra.maths.unsw.oz.au (Michael Gerberg) writes:
 >                            The trouble is that certain specific intrinsic
 > functions are not converted to appropriate equivalents. In particular,
 > references to CABS, AMOD, DPROD, AIMAG, CSQRT, CEXP, ALOG, CLOG, ALOG10, CSIN
 > and CCOS produce a compile time error "bad argument type to intrinsic" and
 > references to REAL, FLOAT, SNGL and CMPLX cause run time loss of precision.
I would agree with the error message if you use specific function names, but
not with generic names.  Now CABS, AMOD etc. are all specific, replacing those
by the generic names ABS, MOD etc. would solve the problem.  I think the bug
is only with REAL and CMPLX, because I think both are generic names.

Of course, this does not help if you get code you will run; but than the
problem remains with other library (non-instrinsic) routines (eg, BLAS SAXPY
etc.).  Some change of source is required anyhow.
--
dik t. winter, cwi, amsterdam, nederland
dik@cwi.nl