1 files changed, 30 insertions, 0 deletions
diff --git a/testsuite/synth/issue1025/ent.vhdl b/testsuite/synth/issue1025/ent.vhdl
new file mode 100644
index 000000000..ef2a39002
--- /dev/null
+++ b/testsuite/synth/issue1025/ent.vhdl
@@ -0,0 +1,30 @@
+library ieee;
+use ieee.std_logic_1164.all;
+
+entity ent is
+  port (
+    rst : std_logic;
+		clk : in std_logic;
+		counter : out natural
+	);
+end entity;
+
+architecture a of ent is
+	procedure incr(signal i : inout natural) is
+	begin
+		i <= i + 1;
+	end procedure;
+begin
+	process(clk)
+	begin
+          if rising_edge(clk) then
+            if rst = '1' then
+              counter <= 0;
+            else
+              -- works:
+              --counter <= counter + 1;
+              incr(counter);
+            end if;
+          end if;
+	end process;
+end;