]> git.ipfire.org Git - thirdparty/gcc.git/commit
PR fortran/86470 - ICE with OpenMP, class(*) allocatable
authorHarald Anlauf <anlauf@gmx.de>
Thu, 28 Jan 2021 09:13:46 +0000 (10:13 +0100)
committerHarald Anlauf <anlauf@gmx.de>
Thu, 28 Jan 2021 20:44:03 +0000 (21:44 +0100)
commit2d9597f400e3456240e4499c9a9bc7023380247f
treec0b679c2399d24248758b9038b887ac2068f2b3f
parentfaed344ee5f17b9a19961b3b1f8ea0ed10db6f2d
PR fortran/86470 - ICE with OpenMP, class(*) allocatable

gfc_call_malloc should malloc an area of size 1 if no size given.

gcc/fortran/ChangeLog:

PR fortran/86470
* trans.c (gfc_call_malloc): Allocate area of size 1 if passed
size is NULL (as documented).

gcc/testsuite/ChangeLog:

PR fortran/86470
* gfortran.dg/gomp/pr86470.f90: New test.

(cherry picked from commit 33a7a93218b1393d0135e3c4a9ad9ced87808f5e)
gcc/fortran/trans.c
gcc/testsuite/gfortran.dg/gomp/pr86470.f90 [new file with mode: 0644]