The following program compiles with NAG f95, g95 and ifort, but gfortran
writes:

interface1.f90:8.12:

            test2(i:i) = achar(mod(i,32)+iachar('@'))
           1
Error: Unclassifiable statement at (1)

This is possibly related to PR 31222. (If you mark it as duplicate, please
ensure that the full example is tested after that PR is fixed.)

Please also check the full program after you fixed it:
http://home.comcast.net/%7Ekmbtib/Fortran_stuff/interface1.f90

module test1
   implicit none
   contains
      function test2()
         implicit character (t)
         integer i
         do i = 1, len(test2)
            test2(i:i) = achar(mod(i,32)+iachar('@'))
         end do
      end function test2
end module test1


-- 
           Summary: Implicit character and array returning functions
           Product: gcc
           Version: 4.3.0
            Status: UNCONFIRMED
          Keywords: rejects-valid
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: burnus at gcc dot gnu dot org


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

Reply via email to