diff options
author | Tristan Gingold <tgingold@free.fr> | 2015-09-10 20:36:32 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2015-09-10 20:36:32 +0200 |
commit | b195da2af5c575b246e73753dd2c0cab5b1f995c (patch) | |
tree | 8b48113226cae4d5a7b1b45e52fd34fef4a95e6d | |
parent | a5cf8c93a36d004577d92a951ea081682840dcd1 (diff) | |
download | ghdl-b195da2af5c575b246e73753dd2c0cab5b1f995c.tar.gz ghdl-b195da2af5c575b246e73753dd2c0cab5b1f995c.tar.bz2 ghdl-b195da2af5c575b246e73753dd2c0cab5b1f995c.zip |
Add testcase for ticket93.
-rw-r--r-- | testsuite/gna/ticket93/test.vhd | 15 | ||||
-rwxr-xr-x | testsuite/gna/ticket93/testsuite.sh | 9 |
2 files changed, 24 insertions, 0 deletions
diff --git a/testsuite/gna/ticket93/test.vhd b/testsuite/gna/ticket93/test.vhd new file mode 100644 index 000000000..5092254f5 --- /dev/null +++ b/testsuite/gna/ticket93/test.vhd @@ -0,0 +1,15 @@ +entity test is
+end entity test;
+
+entity internal is
+end entity internal;
+architecture arch of internal is begin
+end architecture arch;
+
+architecture first of test is begin
+ test_instantiation : entity work.internal;
+end architecture first;
+
+architecture second of test is begin
+end architecture second;
+
diff --git a/testsuite/gna/ticket93/testsuite.sh b/testsuite/gna/ticket93/testsuite.sh new file mode 100755 index 000000000..1bfd7e8fd --- /dev/null +++ b/testsuite/gna/ticket93/testsuite.sh @@ -0,0 +1,9 @@ +#! /bin/sh + +. ../../testenv.sh + +analyze test.vhd +elab_simulate test +clean + +echo "Test successful" |