diff options
| author | Tristan Gingold <tgingold@free.fr> | 2017-07-20 05:33:27 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2017-07-20 05:33:27 +0200 |
| commit | 866e24bc5b163da2aad0f6bb5f63b7022cc1fe5c (patch) | |
| tree | 9cbdb48dc0b91aa9e37fe24b9167d5bc565a8b08 /src/libraries.adb | |
| parent | feb9de82f7305caf3437ed8ab3dd01deba395362 (diff) | |
| download | ghdl-866e24bc5b163da2aad0f6bb5f63b7022cc1fe5c.tar.gz ghdl-866e24bc5b163da2aad0f6bb5f63b7022cc1fe5c.tar.bz2 ghdl-866e24bc5b163da2aad0f6bb5f63b7022cc1fe5c.zip | |
Refine previous patch: don't keep obsolete units of current analyzed file.
Diffstat (limited to 'src/libraries.adb')
| -rw-r--r-- | src/libraries.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/libraries.adb b/src/libraries.adb index 6905edfb4..f84a36304 100644 --- a/src/libraries.adb +++ b/src/libraries.adb @@ -1742,7 +1742,7 @@ package body Libraries is +Get_Design_File_Filename (Design_File)); raise Compilation_Error; elsif Get_Date (Design_Unit) = Date_Obsolete then - Error_Msg_Sem (+Design_Unit, "%n is not anymore its source file", + Error_Msg_Sem (+Design_Unit, "%n has been obsoleted", +Get_Library_Unit (Design_Unit)); raise Compilation_Error; end if; |