summaryrefslogtreecommitdiff
path: root/translate
diff options
context:
space:
mode:
authorTristan Gingold2014-07-19 07:32:39 +0200
committerTristan Gingold2014-07-19 07:32:39 +0200
commit4168dec01d69b644c59858be3af8d56b055fbbc2 (patch)
treeb620bd83cc41629d391ba54d98013a7b1f5b513c /translate
parent415befa3bfe945bc069fd1ce73d8efd91e3b459f (diff)
downloadghdl-4168dec01d69b644c59858be3af8d56b055fbbc2.tar.gz
ghdl-4168dec01d69b644c59858be3af8d56b055fbbc2.tar.bz2
ghdl-4168dec01d69b644c59858be3af8d56b055fbbc2.zip
Handle character literals like simple names.
Diffstat (limited to 'translate')
-rw-r--r--translate/translation.adb1
1 files changed, 1 insertions, 0 deletions
diff --git a/translate/translation.adb b/translate/translation.adb
index 8836281..a949692 100644
--- a/translate/translation.adb
+++ b/translate/translation.adb
@@ -16884,6 +16884,7 @@ package body Translation is
Res := Chap14.Translate_Path_Instance_Name_Attribute (Expr);
when Iir_Kind_Simple_Name
+ | Iir_Kind_Character_Literal
| Iir_Kind_Selected_Name =>
return Translate_Expression (Get_Named_Entity (Expr), Rtype);