From bbdfd7d4d0499de9c4e3cf28856110ed0e776fdc Mon Sep 17 00:00:00 2001
From: Eric Schweitz <eschweitz@nvidia.com>
Date: Tue, 9 Oct 2018 10:41:49 -0700
Subject: [PATCH] [flang] add another resolve-label test for misplaced end do
 statement.

Original-commit: flang-compiler/f18@17fa8c1ebf399219febfec659de39a5b558e4b6b
Reviewed-on: https://github.com/flang-compiler/f18/pull/196
Tree-same-pre-rewrite: false
---
 flang/test/semantics/label12.f90 | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)
 create mode 100644 flang/test/semantics/label12.f90

diff --git a/flang/test/semantics/label12.f90 b/flang/test/semantics/label12.f90
new file mode 100644
index 0000000..25edb9c
--- /dev/null
+++ b/flang/test/semantics/label12.f90
@@ -0,0 +1,22 @@
+! Copyright (c) 2018, NVIDIA CORPORATION.  All rights reserved.
+!
+! Licensed under the Apache License, Version 2.0 (the "License");
+! you may not use this file except in compliance with the License.
+! You may obtain a copy of the License at
+!
+!     http://www.apache.org/licenses/LICENSE-2.0
+!
+! Unless required by applicable law or agreed to in writing, software
+! distributed under the License is distributed on an "AS IS" BASIS,
+! WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+! See the License for the specific language governing permissions and
+! limitations under the License.
+
+! RUN: ${F18} -funparse-with-symbols %s 2>&1 | ${FileCheck} %s
+! CHECK: expected end of statement
+
+subroutine s
+  do 10 i = 1, 10
+5  end do
+10 end do
+end subroutine s
-- 
2.7.4