Fix entity instantiation with extended identifier.

From a patch by Ole Myren Rohne.

2 files changed, 24 insertions, 0 deletions

diff --git a/testsuite/gna/bug12/demo.vhd b/testsuite/gna/bug12/demo.vhd
new file mode 100644
index 0000000..2b97782
--- /dev/null
+++ b/testsuite/gna/bug12/demo.vhd
@@ -0,0 +1,14 @@
+entity bar is
+end entity bar;
+entity \foo\ is
+  port (test : in bit);
+end entity \foo\;
+architecture structural of \foo\ is
+begin  -- architecture structural
+end architecture structural;
+architecture structural of bar is
+  signal test : bit;
+begin  -- architecture structural
+  foo_1: entity work.\foo\
+    port map (test => test);
+end architecture structural;
diff --git a/testsuite/gna/bug12/testsuite.sh b/testsuite/gna/bug12/testsuite.sh
new file mode 100755
index 0000000..9b3d98c
--- /dev/null
+++ b/testsuite/gna/bug12/testsuite.sh
@@ -0,0 +1,10 @@
+#! /bin/sh
+
+. ../../testenv.sh
+
+analyze demo.vhd
+elab_simulate bar structural
+
+clean
+
+echo "Test successful"