------- Comment #3 from burnus at gcc dot gnu dot org  2008-01-03 09:14 -------
Reduced test; has nothing to do with BIND(C). I am not 100% sure it is valid.
(Actually, glancing at the code, I had said it is invalid). However, it gives
no error/warning (or ICE) with other compilers such as NAG f95, g95, openf95,
ifort, which implies that it is presumably valid.

MODULE test
  IMPLICIT NONE
  TYPE :: my_type
    INTEGER :: value
  END TYPE
CONTAINS
  SUBROUTINE get_values(values)
    INTEGER,POINTER :: values(:)
    TYPE(my_type),POINTER :: d(:)
    values => d(:)%value
  END SUBROUTINE
END MODULE


-- 

burnus at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
OtherBugsDependingO|32630                       |32834
              nThis|                            |
  GCC build triplet|20080102 (experimental)     |
                   |[trunk revision 131253]     |
   GCC host triplet|i686-pc-linux-gnu           |
 GCC target triplet|GNU Fortran (GCC) 4.3.0     |
            Summary|ICE with c_f_pointer        |ICE when assigning item of a
                   |                            |derived-component to a
                   |                            |pointer


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

Reply via email to