[Bug fortran/52469] New: Defining function pointer interface

[palott at gmail dot com]

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

             Bug #: 52469
           Summary: Defining function pointer interface
    Classification: Unclassified
           Product: gcc
           Version: 4.7.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned@gcc.gnu.org
        ReportedBy: palott@gmail.com


iMac% gfortran -v -save-temps -c  examfun1.f90           
Using built-in specs.
COLLECT_GCC=gfortran
COLLECT_LTO_WRAPPER=/usr/local/libexec/gcc/x86_64-apple-darwin11.3.0/4.7.0/lto-wrapper
Target: x86_64-apple-darwin11.3.0
Configured with: ../gcc-4.7-20120204/configure --enable-languages=c,fortran
Thread model: posix
gcc version 4.7.0 20120204 (experimental) (GCC) 
COLLECT_GCC_OPTIONS='-mmacosx-version-min=10.7.3' '-v' '-save-temps' '-c'
'-mtune=core2'
 /usr/local/libexec/gcc/x86_64-apple-darwin11.3.0/4.7.0/f951 examfun1.f90 -fPIC
-quiet -dumpbase examfun1.f90 -mmacosx-version-min=10.7.3 -mtune=core2 -auxbase
examfun1 -version -fintrinsic-modules-path
/usr/local/lib/gcc/x86_64-apple-darwin11.3.0/4.7.0/finclude -o examfun1.s
GNU Fortran (GCC) version 4.7.0 20120204 (experimental)
(x86_64-apple-darwin11.3.0)
    compiled by GNU C version 4.7.0 20120204 (experimental), GMP version 4.3.1,
MPFR version 2.4.1, MPC version 0.8.1
GGC heuristics: --param ggc-min-expand=30 --param ggc-min-heapsize=4096
GNU Fortran (GCC) version 4.7.0 20120204 (experimental)
(x86_64-apple-darwin11.3.0)
    compiled by GNU C version 4.7.0 20120204 (experimental), GMP version 4.3.1,
MPFR version 2.4.1, MPC version 0.8.1
GGC heuristics: --param ggc-min-expand=30 --param ggc-min-heapsize=4096
examfun1.f90: In function ‘test_proc_ptr’:
examfun1.f90:74:0: internal compiler error: tree check: expected function_type
or method_type, have pointer_type in gimplify_call_expr, at gimplify.c:2436
Please submit a full bug report,
with preprocessed source if appropriate.
See <http://gcc.gnu.org/bugs.html> for instructions.