> cat test.f90 SUBROUTINE S1(t1,t2,c0,n) REAL :: t1(n,n),t2(n,n),c0(n,n) INTEGER :: i,j,k DO i=1,n DO j=1,n DO k=1,n co(i,j)=t1(i,k)*t2(j,k) ENDDO ENDDO ENDDO END SUBROUTINE S1 > gfortran test.f90 test.f90:7.29:
co(i,j)=t1(i,k)*t2(j,k) 1 Error: Unexpected STATEMENT FUNCTION statement at (1) I couldn't agree more, but some users might get confused. Imagine you take your 'Fortran 90/95 for Scientists and Engineers' book to understand what the compiler really means. -- Summary: poor error message 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 http://gcc.gnu.org/bugzilla/show_bug.cgi?id=38312