From 1339a25239a43170dc5a213b2693a33c5a0c996d Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Thu, 23 Apr 2020 18:27:18 +0200
Subject: testsuite/gna: add a test for the previous commit.

---
 testsuite/gna/bug0100/libparen.vhdl | 7 +++++++
 testsuite/gna/bug0100/testsuite.sh  | 1 +
 2 files changed, 8 insertions(+)
 create mode 100644 testsuite/gna/bug0100/libparen.vhdl

diff --git a/testsuite/gna/bug0100/libparen.vhdl b/testsuite/gna/bug0100/libparen.vhdl
new file mode 100644
index 000000000..357ef6b77
--- /dev/null
+++ b/testsuite/gna/bug0100/libparen.vhdl
@@ -0,0 +1,7 @@
+entity libparen is
+end libparen;
+
+architecture behav of libparen is
+  constant c : boolean := work(5);
+begin
+end behav;
diff --git a/testsuite/gna/bug0100/testsuite.sh b/testsuite/gna/bug0100/testsuite.sh
index e4deb379a..9fa07d4bc 100755
--- a/testsuite/gna/bug0100/testsuite.sh
+++ b/testsuite/gna/bug0100/testsuite.sh
@@ -18,6 +18,7 @@ analyze_failure forloop.vhdl
 analyze_failure emptyquote.vhdl
 analyze_failure qual.vhdl
 analyze_failure proctarg.vhdl
+analyze_failure libparen.vhdl
 
 if analyze_failure --force-analysis notype1.vhdl 2>&1 | grep -q "indexed name"; then
   :
-- 
cgit v1.2.3