From 26d4381d0f167dbe14863b3261f9465a8c90412f Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Sun, 2 Apr 2017 18:17:30 +0200
Subject: Add more testcases for bug069

---
 testsuite/gna/bug069/bug7.vhdl | 13 +++++++++++++
 1 file changed, 13 insertions(+)
 create mode 100644 testsuite/gna/bug069/bug7.vhdl

(limited to 'testsuite/gna/bug069/bug7.vhdl')

diff --git a/testsuite/gna/bug069/bug7.vhdl b/testsuite/gna/bug069/bug7.vhdl
new file mode 100644
index 000000000..88d96f71a
--- /dev/null
+++ b/testsuite/gna/bug069/bug7.vhdl
@@ -0,0 +1,13 @@
+entity bug7 is
+end entity bug7;
+
+architecture x of bug7 is
+
+  constant cst : real := 5.5;
+  signal test : integer;
+
+begin
+
+  test <= cst;
+
+end architecture x;
-- 
cgit v1.2.3