[committed] Add missing results check in 'libgomp.fortran/allocatable3.f90' (was: [5/5] gomp-3_0-branch merge to trunk - OpenMP testsuite additions and fixes)

Message ID 87tvcmfrcf.fsf@euler.schwinge.homeip.net
State New
Headers show
Series
  • [committed] Add missing results check in 'libgomp.fortran/allocatable3.f90' (was: [5/5] gomp-3_0-branch merge to trunk - OpenMP testsuite additions and fixes)
Related show

Commit Message

Thomas Schwinge June 18, 2019, 10:42 p.m.
Hi!

On Thu, 5 Jun 2008 12:08:28 -0400, Jakub Jelinek <jakub@redhat.com> wrote:
> This patch contains the OpenMP specific testsuite additions and fixes.


> 	* testsuite/libgomp.fortran/allocatable3.f90: New test.


As obvious (that is, as done for all the other test cases), I committed
to trunk in r272449 "Add missing results check in
'libgomp.fortran/allocatable3.f90'", see attached.


Grüße
 Thomas

Patch

From 4173ac4522222932749a0f1d19228adc9a2284bc Mon Sep 17 00:00:00 2001
From: tschwinge <tschwinge@138bc75d-0d04-0410-961f-82ee72b054a4>
Date: Tue, 18 Jun 2019 22:14:43 +0000
Subject: [PATCH] Add missing results check in
 'libgomp.fortran/allocatable3.f90'

	libgomp/
	* testsuite/libgomp.fortran/allocatable3.f90: Add missing results
	check.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@272449 138bc75d-0d04-0410-961f-82ee72b054a4
---
 libgomp/ChangeLog                                  | 5 +++++
 libgomp/testsuite/libgomp.fortran/allocatable3.f90 | 1 +
 2 files changed, 6 insertions(+)

diff --git a/libgomp/ChangeLog b/libgomp/ChangeLog
index bd57e38ce19a..ef6397f1d28b 100644
--- a/libgomp/ChangeLog
+++ b/libgomp/ChangeLog
@@ -1,3 +1,8 @@ 
+2019-06-18  Thomas Schwinge  <thomas@codesourcery.com>
+
+	* testsuite/libgomp.fortran/allocatable3.f90: Add missing results
+	check.
+
 2019-06-18  Cesar Philippidis  <cesar@codesourcery.com>
 
 	* 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 03ed1ac3f1ad..df69fff54919 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.20.1