From 4c014bcc9e319eb6078d6f21857cd170c26483f1 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Wed, 6 Nov 2019 04:49:21 +0100
Subject: testsuite/synth: add a similar testcase for #1009

---
 testsuite/synth/issue1009/array_test.vhdl | 13 +++++++++++++
 1 file changed, 13 insertions(+)
 create mode 100644 testsuite/synth/issue1009/array_test.vhdl

(limited to 'testsuite/synth/issue1009/array_test.vhdl')

diff --git a/testsuite/synth/issue1009/array_test.vhdl b/testsuite/synth/issue1009/array_test.vhdl
new file mode 100644
index 000000000..571476555
--- /dev/null
+++ b/testsuite/synth/issue1009/array_test.vhdl
@@ -0,0 +1,13 @@
+entity array_test is
+  port (
+    o : out integer
+  );
+end array_test;
+
+architecture rtl of array_test is
+  type t_array is array (natural range <>) of integer;
+  constant rec_constant : t_array := (1 => 27.777 us / 83.333 ns);
+  constant rec_constant2 : t_array := rec_constant;
+begin
+  o <= rec_constant2 (1);
+end rtl;
-- 
cgit v1.2.3