1 files changed, 28 insertions, 0 deletions
diff --git a/testsuite/gna/ticket94/tb3.vhd b/testsuite/gna/ticket94/tb3.vhd
new file mode 100644
index 000000000..9cef08e29
--- /dev/null
+++ b/testsuite/gna/ticket94/tb3.vhd
@@ -0,0 +1,28 @@
+
+library ieee;
+use ieee.std_logic_1164.all;
+library alib;
+
+entity tb3 is
+end;
+
+architecture arch of tb3 is
+
+    signal a, b :  std_logic := '0';
+
+begin
+    ainst: alib.apkg.acomp
+        port map (a, b);
+
+    process is
+    begin
+        a <= '0';
+        wait for 1 ns;
+        assert b = '0' report "component is missing" severity failure;
+        a <= '1';
+        wait for 1 ns;
+        assert b = '1' report "component is missing" severity failure;
+        wait;
+  end process;
+
+end architecture;