With the latest gfortran (CVS 2005-03-01 12:00 EST) I get an internal compiler
error.  The code compiles fine with ifort 8.1 and NAG 5.0.

> gfortran-CVS -DGF95 -Wall -v -save-temps -c gfortran.F95
Using built-in specs.
Configured with: ../configure --prefix=/home/zeekec/local/ --program-suffix=-CVS
--enable-languages=c,c++,f95
Thread model: posix
gcc version 4.0.0 20050103 (experimental)
 /home/zeekec/local/bin/../libexec/gcc/i686-pc-linux-gnu/4.0.0/cc1 -E
-traditional-cpp -D_LANGUAGE_FORTRAN -quiet -v -iprefix
/home/zeekec/local/bin/../lib/gcc/i686-pc-linux-gnu/4.0.0/ -DGF95 gfortran.F95
-mtune=pentiumpro -Wall -fpch-preprocess -o gfortran.f95
ignoring nonexistent directory
"/home/zeekec/local/bin/../lib/gcc/i686-pc-linux-gnu/4.0.0/../../../../i686-pc-linux-gnu/include"
ignoring duplicate directory
"/home/zeekec/local//lib/gcc/i686-pc-linux-gnu/4.0.0/include"
ignoring nonexistent directory
"/home/zeekec/local//lib/gcc/i686-pc-linux-gnu/4.0.0/../../../../i686-pc-linux-gnu/include"
#include "..." search starts here:
#include <...> search starts here:
 /home/zeekec/local/bin/../lib/gcc/i686-pc-linux-gnu/4.0.0/include
 /usr/local/include
 /home/zeekec/local//include
 /usr/include
End of search list.
 /home/zeekec/local/bin/../libexec/gcc/i686-pc-linux-gnu/4.0.0/f951 gfortran.f95
-quiet -dumpbase gfortran.F95 -mtune=pentiumpro -auxbase gfortran -Wall -version
-o gfortran.s
GNU F95 version 4.0.0 20050103 (experimental) (i686-pc-linux-gnu)
        compiled by GNU C version 4.0.0 20041220 (experimental).
GGC heuristics: --param ggc-min-expand=30 --param ggc-min-heapsize=4096
gfortran.F95: In function ‘sgl2str3’:
gfortran.F95:5: internal compiler error: in gfc_conv_function_call, at
fortran/trans-expr.c:1106
Please submit a full bug report,
with preprocessed source if appropriate.
See <URL:http://gcc.gnu.org/bugs.html> for instructions.

-- 
           Summary: internal compiler error: in gfc_conv_function_call, at
                    fortran/trans-expr.c:1106
           Product: gcc
           Version: 4.0.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: zeekec at mad dot scientist dot com
                CC: gcc-bugs at gcc dot gnu dot org
 GCC build triplet: i686-pc-linux-gnu
  GCC host triplet: i686-pc-linux-gnu
GCC target triplet: i686-pc-linux-gnu


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