testsuite/gna: add a reproducer for #2166

1 files changed, 35 insertions, 0 deletions

diff --git a/testsuite/gna/issue2166/tb2.vhdl b/testsuite/gna/issue2166/tb2.vhdl
new file mode 100644
index 000000000..f08f5d659
--- /dev/null
+++ b/testsuite/gna/issue2166/tb2.vhdl
@@ -0,0 +1,35 @@
+library OSVVM ;
+
+use OSVVM.MemorySupportPkg.all ;
+
+package MemoryPkg is new OSVVM.MemoryGenericPkg
+  generic map (
+--    MemoryBaseType      => MemoryBaseType_X,
+    SizeMemoryBaseType  => SizeMemoryBaseType_X,
+    ToMemoryBaseType    => ToMemoryBaseType_X,
+    FromMemoryBaseType  => FromMemoryBaseType_X,
+    InitMemoryBaseType  => InitMemoryBaseType_X
+  ) ;
+
+library ieee ;
+use ieee.std_logic_1164.all ;
+use ieee.numeric_std.all ;
+use work.MemoryPkg.all;
+
+entity tb2 is
+end;
+
+architecture behav of tb2 is
+begin
+  process
+    variable MemoryID : MemoryIDType;
+  begin
+    MemoryID := NewID(
+      Name      => "my_sram",
+      AddrWidth => 20,
+      DataWidth => 16);
+
+    MemWrite(MemoryId, x"00000", x"0000");
+    wait;
+  end process;
+end ;