diff options
| author | Hafiz Abid Qadeer <abidh@codesourcery.com> | 2022-01-17 13:45:08 +0000 |
|---|---|---|
| committer | Hafiz Abid Qadeer <abidh@codesourcery.com> | 2022-01-17 13:57:18 +0000 |
| commit | deb9f18f67788c36f4652bca101d93faf07ecf39 (patch) | |
| tree | ebfbdefff081a6489d7bd5d2b301a87e33c97b32 /gcc | |
| parent | a81f6092350cf2c8fc3e3cefc61af7a1649ae030 (diff) | |
| download | gcc-deb9f18f67788c36f4652bca101d93faf07ecf39.zip gcc-deb9f18f67788c36f4652bca101d93faf07ecf39.tar.gz gcc-deb9f18f67788c36f4652bca101d93faf07ecf39.tar.bz2 | |
Change kind of integer literal to fix a testcase.
As Thomas reported in
https://gcc.gnu.org/pipermail/gcc-patches/2022-January/588448.html
a test added in my recent allocate clause patch fails on m32. It was due
to default kind for integer matching c_intptr_t for m32. I have now
changed it to 0_1 so that always integer with kind=1 is used.
gcc/testsuite/ChangeLog:
* gfortran.dg/gomp/allocate-2.f90: Change 0 to 0_1.
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/testsuite/gfortran.dg/gomp/allocate-2.f90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/testsuite/gfortran.dg/gomp/allocate-2.f90 b/gcc/testsuite/gfortran.dg/gomp/allocate-2.f90 index 88b2d26..657ff44 100644 --- a/gcc/testsuite/gfortran.dg/gomp/allocate-2.f90 +++ b/gcc/testsuite/gfortran.dg/gomp/allocate-2.f90 @@ -33,7 +33,7 @@ subroutine foo(x) x=5 !$omp end parallel - !$omp parallel allocate (0: x) private(x) ! { dg-error "Expected integer expression of the 'omp_allocator_handle_kind' kind at .1." } + !$omp parallel allocate (0_1: x) private(x) ! { dg-error "Expected integer expression of the 'omp_allocator_handle_kind' kind at .1." } x=6 !$omp end parallel |