diff options
| author | Tristan Gingold <tgingold@free.fr> | 2018-12-03 20:05:04 +0100 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2018-12-03 20:12:09 +0100 |
| commit | 8fb41b61659c2ee3d86dc9aebb0b60e5582a5ac1 (patch) | |
| tree | 1a4cbb94278e47dda12775cd908133747b588ab8 | |
| parent | 36b0b3d91179be364b45acd1527dde8a51553f51 (diff) | |
| download | ghdl-8fb41b61659c2ee3d86dc9aebb0b60e5582a5ac1.tar.gz ghdl-8fb41b61659c2ee3d86dc9aebb0b60e5582a5ac1.tar.bz2 ghdl-8fb41b61659c2ee3d86dc9aebb0b60e5582a5ac1.zip | |
sem_lib: avoid missing location in error message.
| -rw-r--r-- | src/vhdl/sem_lib.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/vhdl/sem_lib.adb b/src/vhdl/sem_lib.adb index 5f1c0b367..6595731c2 100644 --- a/src/vhdl/sem_lib.adb +++ b/src/vhdl/sem_lib.adb @@ -192,7 +192,7 @@ package body Sem_Lib is end if; if Get_Date (Design_Unit) = Date_Obsolete then - Error_Msg_Sem (+Design_Unit, "%n has been obsoleted", + Error_Msg_Sem (+Loc, "%n has been obsoleted", +Get_Library_Unit (Design_Unit)); raise Compilation_Error; end if; |