From d4ba25fa7fb5e7e110c5dbf567bd840e845ba834 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Fri, 2 Sep 2016 05:08:54 +0200
Subject: Add testcase for previous patch (very simple nested packages)

---
 testsuite/gna/bug052/tb_simple.vhdl | 11 +++++++++++
 1 file changed, 11 insertions(+)
 create mode 100644 testsuite/gna/bug052/tb_simple.vhdl

(limited to 'testsuite/gna/bug052/tb_simple.vhdl')

diff --git a/testsuite/gna/bug052/tb_simple.vhdl b/testsuite/gna/bug052/tb_simple.vhdl
new file mode 100644
index 000000000..4ba82f6b0
--- /dev/null
+++ b/testsuite/gna/bug052/tb_simple.vhdl
@@ -0,0 +1,11 @@
+entity tb_simple is
+  package pkg1 is
+    constant c : natural := 5;
+  end pkg1;
+end tb_simple;
+
+architecture behav of tb_simple is
+begin
+  assert pkg1.c = 5 severity failure;
+  assert pkg1.c /= 5 report "value is correct" severity note;
+end behav;
-- 
cgit v1.2.3