diff options
| author | Tristan Gingold <tgingold@free.fr> | 2015-06-02 20:21:32 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2015-06-02 20:21:32 +0200 |
| commit | 3e6affe81ae722794a3d74e0a480c7d9dacdf406 (patch) | |
| tree | c78b03e04ac761b40279b6838425be2f1b57e5ae /src/vhdl/simulate/elaboration.adb | |
| parent | d82c1416e7e247023f171aea8855f8a2cac5397c (diff) | |
| download | ghdl-3e6affe81ae722794a3d74e0a480c7d9dacdf406.tar.gz ghdl-3e6affe81ae722794a3d74e0a480c7d9dacdf406.tar.bz2 ghdl-3e6affe81ae722794a3d74e0a480c7d9dacdf406.zip | |
Fix simulate backend.
Diffstat (limited to 'src/vhdl/simulate/elaboration.adb')
| -rw-r--r-- | src/vhdl/simulate/elaboration.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/vhdl/simulate/elaboration.adb b/src/vhdl/simulate/elaboration.adb index 0deb32934..18fcd10be 100644 --- a/src/vhdl/simulate/elaboration.adb +++ b/src/vhdl/simulate/elaboration.adb @@ -1701,7 +1701,7 @@ package body Elaboration is -- declaration and architecture body or is bound to a configuration of -- such a design entity. if not Is_Fully_Bound (Conf) then - Warning_Msg (Disp_Node (Stmt) & " not bound"); + Warning_Msg_Elab (Disp_Node (Stmt) & " not bound", Stmt); return; end if; |