This is the mail archive of the gcc-patches@gcc.gnu.org mailing list for the GCC project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

[gfortran] ping patch PR fortran/19362


We have a nice patch for PR fortran/19362 that has been waiting for a long time: http://gcc.gnu.org/ml/gcc-patches/2005-01/msg00761.html

Could someone review it? I propose a testcase to go with it, since the original patch did not include one.

FX
MODULE M
  TYPE T0
  SEQUENCE
  INTEGER I
  END TYPE
END

PROGRAM MAIN
  USE M, T1 => T0
  TYPE T0
    SEQUENCE
    INTEGER I
  END TYPE
  TYPE(T0) :: BAR
  TYPE(T1) :: BAZ

  BAR%I = 1
  BAZ = BAR
  IF (BAZ%I /= 1) CALL ABORT
END

Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]