No need for a temp here:

SUBROUTINE S1(a,i,j,k,m)
   INTEGER :: a(3,6)
   a(1:3,m)=(/i,j,k/)
END


-- 
           Summary: unneeded temp
           Product: gcc
           Version: 4.4.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: jv244 at cam dot ac dot uk
OtherBugsDependingO 36854
             nThis:


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

Reply via email to