This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/20481] New: RAN() should not be an intrinsic function
- From: "lei at il dot ibm dot com" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 15 Mar 2005 12:51:14 -0000
- Subject: [Bug fortran/20481] New: RAN() should not be an intrinsic function
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
(1) This example compiles with ibm xlf compiler, and (2) I could not
find any reference to RAN intrinsic in the last draft standard.
hadas:~% cat 1000d_linpack.f
double precision function ran( iseed )
integer iseed(4)
ran = 0.0
end
program linpack_test
integer i(4)
double precision r
r = ran(i)
end
hadas:~% gfortran -c 1000d_linpack.f
In file 1000d_linpack.f:9
r = ran(i)
1
Error: 'i' argument of 'ran' intrinsic at (1) must be a scalar
--
Summary: RAN() should not be an intrinsic function
Product: gcc
Version: 4.1.0
Status: UNCONFIRMED
Severity: normal
Priority: P2
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: lei at il dot ibm dot com
CC: gcc-bugs at gcc dot gnu dot org
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=20481