1! { dg-do compile } 2module iso_c_binding_only 3 ! c_f_procpointer verifies that the c_funptr derived type for the cptr param 4 ! is auto-generated, and c_f_pointer tests c_ptr. 5 use, intrinsic :: iso_c_binding, only: c_null_ptr, c_f_procpointer 6 ! This should be allowed since the C_PTR that the C_NULL_PTR needs will use 7 ! a mangled name to prevent collisions. 8 integer :: c_ptr 9end module iso_c_binding_only 10