diff options
author | Tristan Gingold <tgingold@free.fr> | 2014-07-19 12:28:29 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2014-07-19 12:28:29 +0200 |
commit | be1cda652b00ebfe4a9b4ca4e3cda2106586e739 (patch) | |
tree | 27fc03ae0baf8ea868778735e5a578346b9077cf /evaluation.adb | |
parent | 4168dec01d69b644c59858be3af8d56b055fbbc2 (diff) | |
download | ghdl-be1cda652b00ebfe4a9b4ca4e3cda2106586e739.tar.gz ghdl-be1cda652b00ebfe4a9b4ca4e3cda2106586e739.tar.bz2 ghdl-be1cda652b00ebfe4a9b4ca4e3cda2106586e739.zip |
Replace architecture_declaration by architecture_body to follow lrm.
Diffstat (limited to 'evaluation.adb')
-rw-r--r-- | evaluation.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/evaluation.adb b/evaluation.adb index d6ce74555..0e5557a8b 100644 --- a/evaluation.adb +++ b/evaluation.adb @@ -2733,7 +2733,7 @@ package body Evaluation is Path_Add (":"); when Iir_Kind_Entity_Declaration => Path_Instance := El; - when Iir_Kind_Architecture_Declaration => + when Iir_Kind_Architecture_Body => Path_Instance := El; when Iir_Kind_Design_Unit => Path_Add_Element (Get_Library_Unit (El), Is_Instance); |