1 files changed, 19 insertions, 0 deletions
diff --git a/testsuite/gna/issue1361/repro.vhdl b/testsuite/gna/issue1361/repro.vhdl
new file mode 100644
index 000000000..54447849d
--- /dev/null
+++ b/testsuite/gna/issue1361/repro.vhdl
@@ -0,0 +1,19 @@
+ENTITY repro IS
+END repro;
+
+ARCHITECTURE vhdl_behavioral of repro IS
+  constant userpreload : boolean := true;
+  CONSTANT MaxData       : NATURAL := 16#FF#;        --255;
+  CONSTANT AddrRANGE     : NATURAL := 16#0FFFFFF#;
+
+  TYPE MemArray IS ARRAY (0 TO AddrRANGE) OF INTEGER RANGE -1 TO MaxData;
+  SHARED VARIABLE Mem          : MemArray  := (OTHERS => MaxData);
+begin
+    MemPreload : PROCESS
+    BEGIN
+        IF UserPreload THEN
+          Mem := (OTHERS => MaxData);
+        end if;
+        WAIT;
+    END PROCESS MemPreload;
+END vhdl_behavioral;