diff options
author | Tristan Gingold <tgingold@free.fr> | 2020-06-09 21:08:55 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2020-06-09 21:12:10 +0200 |
commit | 47547a132eb132778117ca5c4eb3394df0500898 (patch) | |
tree | 0a0b2fb9686978b1ba85d6c35285ae51dcdcb0e2 /src/libraries.ads | |
parent | 288764bb1dfe19c83e119d89009e1d9a47f682b7 (diff) | |
download | ghdl-47547a132eb132778117ca5c4eb3394df0500898.tar.gz ghdl-47547a132eb132778117ca5c4eb3394df0500898.tar.bz2 ghdl-47547a132eb132778117ca5c4eb3394df0500898.zip |
vhdl: allows --work between files for -c. Fix #1362
Diffstat (limited to 'src/libraries.ads')
-rw-r--r-- | src/libraries.ads | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/src/libraries.ads b/src/libraries.ads index 1c954c938..66a80a747 100644 --- a/src/libraries.ads +++ b/src/libraries.ads @@ -167,11 +167,12 @@ package Libraries is -- If there are severals entities, return NULL_IIR; function Find_Entity_For_Component (Name: Name_Id) return Iir_Design_Unit; - -- Decode '--work=NAME' command line option and set the name of the - -- work library. The library has to be loaded later by calling - -- Load_Work_Library. - -- Return false if NAME is not a valid name. - function Decode_Work_Option (Opt : String) return Boolean; + -- Decode '--work=NAME' command line option and return the identifier + -- for the library. + -- To effectively use the library, assign Work_Library_Name and load the + -- library by calling Load_Work_Library. + -- Return Null_Identifier if NAME is not a valid name. + function Decode_Work_Option (Opt : String) return Name_Id; -- Get the chain of libraries. Can be used only to read (it musn't be -- modified). |