re PR fortran/88929 (ICE on building MPICH 3.2 with GCC 9 with ISO_Fortran_binding)
authorPaul Thomas <pault@gcc.gnu.org>
Thu, 24 Jan 2019 07:21:36 +0000 (07:21 +0000)
committerPaul Thomas <pault@gcc.gnu.org>
Thu, 24 Jan 2019 07:21:36 +0000 (07:21 +0000)
2019-01-24  Paul Thomas  <pault@gcc.gnu.org>

PR fortran/88929
* trans-array.c (gfc_conv_descriptor_elem_len): New function.
* trans-array.h : Add prototype for above.
* trans-expr.c (gfc_conv_gfc_desc_to_cfi_desc): Take account of
assumed rank arrays being flagged by rank = -1 in expressions.
Intent in arrays need a pointer to a copy of the data to be
assigned to the descriptor passed for conversion. This should
then be freed, together with the CFI descriptor on return from
the C call.

2019-01-24  Paul Thomas  <pault@gcc.gnu.org>

PR fortran/88929
* gfortran.dg/ISO_Fortran_binding_3.f90 : New test
* gfortran.dg/ISO_Fortran_binding_3.c : Subsidiary source.

From-SVN: r268232

gcc/testsuite/gfortran.dg/ISO_Fortran_binding_3.f90

index 4870ca0edcb09ce03d7b1fed6008d8885b028705..c4cdbf0e74dced784edf5c06648680c696a9826c 100644 (file)
@@ -50,4 +50,4 @@ contains
     err = test_c (arg) ! This used to ICE
 
   end function test2
-end
\ No newline at end of file
+end