[PATCH] [gfortran] Add support for allocate clause (OpenMP 5.0).

[Tobias Burnus]

Hi all,

On 14.01.22 10:10, Thomas Schwinge wrote:
>> +  integer  :: x
>> ...
>> +  !$omp parallel allocate (0: x) private(x) ! { dg-error "Expected integer expression of the 'omp_allocator_handle_kind' kind at .1." }
> We do for x86_64 default '-m64', but for '-m32' and '-mx32' compilation,
> we're not seeing this latter diagnostic:
>      FAIL: gfortran.dg/gomp/allocate-2.f90   -O   (test for errors, line 36)
>
> I suppose the reason is unintended congruence of data types?  Would it
> work to make 'x' a floating-point data type, for example -- or is this
> meant to explicitly check certain integer data type characteristics?

Alternatively, you could use 'integer(kind=1)' (which is a 1-byte/8-bits
type.) I assume we do not have any platform which still uses 8-bit
pointers and supports libgomp :-)

Tobias

-----------------
Siemens Electronic Design Automation GmbH; Anschrift: Arnulfstraße 201, 80634 München; Gesellschaft mit beschränkter Haftung; Geschäftsführer: Thomas Heurung, Frank Thürauf; Sitz der Gesellschaft: München; Registergericht München, HRB 106955