1 files changed, 19 insertions, 0 deletions
diff --git a/testsuite/gna/issue984/generic_check.vhd b/testsuite/gna/issue984/generic_check.vhd
new file mode 100644
index 000000000..cba427e71
--- /dev/null
+++ b/testsuite/gna/issue984/generic_check.vhd
@@ -0,0 +1,19 @@
+use work.types_pkg.all;
+-- Workaround:
+--use work.const_pkg.all;
+
+entity generic_check is
+    generic (
+        i : generic_type
+    );
+end entity;
+
+architecture a of generic_check is
+begin
+    process
+    begin
+        assert i(0) = 5 report "Should be 5, is " & integer'image(i(0))
+           severity failure;
+        wait;
+    end process;
+end architecture;