[Bug fortran/59015] I/O of PARAMETER derived type with private component is forbidden

[fxcoudert at gcc dot gnu.org]

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

--- Comment #3 from Francois-Xavier Coudert <fxcoudert at gcc dot gnu.org> ---
Allowing EXPR_STRUCTURE to go through the tests (by adding it along
EXPR_VARIABLE and EXPR_FUNCTION) leads to a failure of c_ptr_tests_16.f90 (the
rest of the testsuite works ok). The code that triggers it uses a TRANSFER:

module foo
  type mytype
    integer, private :: a, b, c
  end type mytype
end module foo

  use foo
  type(mytype) x
  print *, transfer(32512, x)
end

There is a segfault when it tries to access the symbol of the TRANSFER:

  sym = exp->symtree->n.sym;

I'm not able to dig any further, so I'll let someone else take care of it.