testsuite/synth: add testcase for #1148

2 files changed, 30 insertions, 0 deletions

diff --git a/testsuite/synth/issue1148/test.vhdl b/testsuite/synth/issue1148/test.vhdl
new file mode 100644
index 000000000..51818bd47
--- /dev/null
+++ b/testsuite/synth/issue1148/test.vhdl
@@ -0,0 +1,23 @@
+library IEEE;
+use IEEE.std_logic_1164.all;
+use std.textio.all;
+
+entity mwe is
+end mwe;
+
+architecture test of mwe is
+
+begin
+
+  process
+    variable starttime : time := 1120 us;
+    variable endtime : time := 2031 us;
+    variable dt : time;
+
+  begin
+    dt := endtime - starttime;
+    report "Resulting frequency is: " & to_string(1.0 / (dt / 1000 ms)) & " Hz";
+
+    wait;
+  end process;
+end test;
diff --git a/testsuite/synth/issue1148/testsuite.sh b/testsuite/synth/issue1148/testsuite.sh
new file mode 100755
index 000000000..6494373f7
--- /dev/null
+++ b/testsuite/synth/issue1148/testsuite.sh
@@ -0,0 +1,7 @@
+#! /bin/sh
+
+. ../../testenv.sh
+
+synth --std=08 --expect-failure test.vhdl -e
+
+echo "Test successful"