------- Comment #3 from pault at gcc dot gnu dot org  2007-10-06 11:14 -------
This fails in execution, for the same reason:

  call func_1((/1,2/), 1)
contains
  subroutine func_1(u,n)
    integer :: n, u(n(1))
    print *, u
  end subroutine
end

n is determined to be a function and so must be pure, since it is in a
specification expression.

Fixing this, causes char_result_7.f90 to fail.  g95 and lahey agree that this
is wrong.  I'll submit something soon... ie. just as soon as it has stopped
regtesting.

Cheers

Paul


-- 

pault at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
         AssignedTo|unassigned at gcc dot gnu   |pault at gcc dot gnu dot org
                   |dot org                     |
             Status|NEW                         |ASSIGNED
   Last reconfirmed|2007-10-05 11:15:04         |2007-10-06 11:14:40
               date|                            |


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

Reply via email to