From cb0ec4a5d35d6eb071864f42adefd8d4e2ebaabb Mon Sep 17 00:00:00 2001
From: Patrick Lehmann <Patrick.Lehmann@plc2.de>
Date: Tue, 24 Aug 2021 07:56:33 +0200
Subject: Translate sequential procedure calls.

---
 testsuite/pyunit/Current.vhdl | 1 +
 1 file changed, 1 insertion(+)

(limited to 'testsuite')

diff --git a/testsuite/pyunit/Current.vhdl b/testsuite/pyunit/Current.vhdl
index c02493c21..c7ce678b3 100644
--- a/testsuite/pyunit/Current.vhdl
+++ b/testsuite/pyunit/Current.vhdl
@@ -94,6 +94,7 @@ begin
 				Q <= D after 10 ns;
 			else
 				Q <= std_logic_vector(unsigned(Q) + 1);
+				counter.increment(1);
 			end if;
 		end if;
 
-- 
cgit v1.2.3