Found in PR 38871. The following is invalid as C_F_FUNPTR takes
function/procedure pointers as arguments.

TODO: Check also that C_F_POINTER doesn't take a type(c_ptr) as argument.

use iso_c_binding
type(c_ptr) :: fun
integer, pointer :: bar
call c_f_funpointer(fun,bar)
end


-- 
           Summary: c_f_funpointer - add missing argument checking
           Product: gcc
           Version: 4.4.0
            Status: UNCONFIRMED
          Keywords: accepts-invalid
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: burnus at gcc dot gnu dot org


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

Reply via email to