Resolve ICE in 'gcc/fortran/trans-openmp.cc:gfc_omp_call_is_alloc'
commit453e0f45a49f425992bc47ff8909ed8affc29d2e
authorThomas Schwinge <thomas@codesourcery.com>
Mon, 11 Dec 2023 21:52:54 +0000 (11 22:52 +0100)
committerThomas Schwinge <thomas@codesourcery.com>
Mon, 11 Dec 2023 22:07:17 +0000 (11 23:07 +0100)
tree6e67bdbd656d474a791c3d1ffecd3b19fbbc674b
parent6008b80b25d71827fb26ce49f49aae02b645bb12
Resolve ICE in 'gcc/fortran/trans-openmp.cc:gfc_omp_call_is_alloc'

Fix-up for recent commit 2505a8b41d3b74a545755a278f3750a29c1340b6
"OpenMP: Minor '!$omp allocators' cleanup", which caused:

    {+FAIL: gfortran.dg/gomp/allocate-5.f90   -O  (internal compiler error: tree check: expected class 'type', have 'declaration' (function_decl) in gfc_omp_call_is_alloc, at fortran/trans-openmp.cc:8386)+}
    [-PASS:-]{+FAIL:+} gfortran.dg/gomp/allocate-5.f90   -O  (test for excess errors)

..., and similarly in 'libgomp.fortran/allocators-1.f90',
'libgomp.fortran/allocators-2.f90', 'libgomp.fortran/allocators-3.f90',
'libgomp.fortran/allocators-4.f90', 'libgomp.fortran/allocators-5.f90'.

gcc/fortran/
* trans-openmp.cc (gfc_omp_call_is_alloc): Resolve ICE.
gcc/fortran/trans-openmp.cc