[Bug fortran/20481] New: RAN() should not be an intrinsic function

[Bug fortran/20481] New: RAN() should not be an intrinsic function

[lei at il dot ibm dot com]

(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

[Bug fortran/20481] RAN() should not be an intrinsic function

[lei at il dot ibm dot com]

-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |leehod at il dot ibm dot com


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

[Bug fortran/20481] RAN() should not be an intrinsic function

[sgk at troutmask dot apl dot washington dot edu]

------- Additional Comments From sgk at troutmask dot apl dot washington dot edu  2005-03-15 15:24 -------
Add "external ran" to your program.  RAN is an intrinsic
procedure because it was an intrinsic procedure in g77.
Or add "-std=f95" to your command line.

-- 


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

[Bug fortran/20481] RAN() should not be an intrinsic function

[pinskia at gcc dot gnu dot org]

------- Additional Comments From pinskia at gcc dot gnu dot org  2005-03-15 16:03 -------
Actually it was not g77 intrinsic but rather an hp extension intrinsic which  I had filed (PR 14993), 
adding what Steve recommends fixes the problem.

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


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