[Bug fortran/41121] New: compile-time error when building BLAS with -fimplicit-none

["barron dot bichon at swri dot org" <gcc-bugzilla at gcc dot gnu dot org>]

With version r150889, compiling several BLAS and LAPACK source files produce
errors with the '-fimplicit-none' flag. For instance, when building
http://www.netlib.org/blas/dgbmv.f I get the following error message:

> gfortran -c -fimplicit-none dgbmv.f
dgbmv.f:297.72:

      END
                                                                        1
Error: Symbol 'a1' at (1) has no IMPLICIT type
dgbmv.f:297.72:

      END
                                                                        1
Error: Symbol 'a2' at (1) has no IMPLICIT type
dgbmv.f:143.19:

      INTRINSIC MAX,MIN
                   1
Error: Function 'max' at (1) has no IMPLICIT type
dgbmv.f:143.23:

      INTRINSIC MAX,MIN
                       1
Error: Function 'min' at (1) has no IMPLICIT type

When '-fimplicit-none' is removed, the file compiles without error. Tested on
OS X and Linux.

(My first bug report, so apologies if I'm missing something.)


-- 
           Summary: compile-time error when building BLAS with -fimplicit-
                    none
           Product: gcc
           Version: 4.5.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: barron dot bichon at swri dot org


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