testsuite: add xfail1 test

3 files changed, 35 insertions, 0 deletions

diff --git a/testsuite/ghdl-issues/xfail1/test.vhdl b/testsuite/ghdl-issues/xfail1/test.vhdl
new file mode 100644
index 0000000..f9f8ed5
--- /dev/null
+++ b/testsuite/ghdl-issues/xfail1/test.vhdl
@@ -0,0 +1,13 @@
+library ieee;
+use ieee.std_logic_1164.all;
+
+entity test is
+    port(
+        clk          : in std_logic
+        );
+end entity test;
+
+architecture behaviour of test is
+begin
+    clk <= '1';
+end architecture behaviour;
diff --git a/testsuite/ghdl-issues/xfail1/testfail.sh b/testsuite/ghdl-issues/xfail1/testfail.sh
new file mode 100755
index 0000000..81e1f26
--- /dev/null
+++ b/testsuite/ghdl-issues/xfail1/testfail.sh
@@ -0,0 +1,10 @@
+#!/bin/sh
+
+# Same as testsuite.sh but should really fail.
+topdir=../..
+. $topdir/testenv.sh
+
+synth_import --std=08 test.vhdl -e
+
+clean
+echo OK
diff --git a/testsuite/ghdl-issues/xfail1/testsuite.sh b/testsuite/ghdl-issues/xfail1/testsuite.sh
new file mode 100755
index 0000000..f73af4f
--- /dev/null
+++ b/testsuite/ghdl-issues/xfail1/testsuite.sh
@@ -0,0 +1,12 @@
+#!/bin/sh
+
+topdir=../..
+. $topdir/testenv.sh
+
+if synth_import --std=08 test.vhdl -e; then
+  echo "test is expected to fail"
+  exit 1
+fi
+
+clean
+echo OK