From bd194a51d45d7435dcc6a2cc91bafe03361ef605 Mon Sep 17 00:00:00 2001 From: Thomas Schwinge Date: Wed, 19 Jun 2019 00:14:43 +0200 Subject: [PATCH] Add missing results check in 'libgomp.fortran/allocatable3.f90' libgomp/ * testsuite/libgomp.fortran/allocatable3.f90: Add missing results check. From-SVN: r272449 --- libgomp/ChangeLog | 5 +++++ libgomp/testsuite/libgomp.fortran/allocatable3.f90 | 1 + 2 files changed, 6 insertions(+) diff --git a/libgomp/ChangeLog b/libgomp/ChangeLog index bd57e38ce19..ef6397f1d28 100644 --- a/libgomp/ChangeLog +++ b/libgomp/ChangeLog @@ -1,3 +1,8 @@ +2019-06-18 Thomas Schwinge + + * testsuite/libgomp.fortran/allocatable3.f90: Add missing results + check. + 2019-06-18 Cesar Philippidis * testsuite/libgomp.oacc-fortran/allocatable-array-1.f90: New diff --git a/libgomp/testsuite/libgomp.fortran/allocatable3.f90 b/libgomp/testsuite/libgomp.fortran/allocatable3.f90 index 03ed1ac3f1a..df69fff5491 100644 --- a/libgomp/testsuite/libgomp.fortran/allocatable3.f90 +++ b/libgomp/testsuite/libgomp.fortran/allocatable3.f90 @@ -18,4 +18,5 @@ l = l.or.any (a.ne.0) deallocate (a) !$omp end parallel + if (l.or.allocated (a)) STOP 2 end -- 2.30.2