diff options
author | Tristan Gingold <tgingold@free.fr> | 2019-10-15 06:48:45 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2019-10-15 06:48:45 +0200 |
commit | 66335e7a44dc449e99706c26d51f6da11b01a7f7 (patch) | |
tree | efdeccdf216a35e9c1829e0e6202c372f755b966 /src/libraries.ads | |
parent | 001bdb593ff5d2413c3a3a39ee0b65fc20a27cd0 (diff) | |
download | ghdl-66335e7a44dc449e99706c26d51f6da11b01a7f7.tar.gz ghdl-66335e7a44dc449e99706c26d51f6da11b01a7f7.tar.bz2 ghdl-66335e7a44dc449e99706c26d51f6da11b01a7f7.zip |
Use Decode_Work_Option in options. Factorize code.
Diffstat (limited to 'src/libraries.ads')
-rw-r--r-- | src/libraries.ads | 10 |
1 files changed, 4 insertions, 6 deletions
diff --git a/src/libraries.ads b/src/libraries.ads index 99dcca393..1c954c938 100644 --- a/src/libraries.ads +++ b/src/libraries.ads @@ -167,13 +167,11 @@ 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. + -- 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. - -- If IMMEDIATE is true, the library is created and loaded from disk - -- iff LOAD_LIB is true. If IMMEDIATE is false, the name of the work - -- library is simply set to NAME and Load_Work_Library has to be called. - function Decode_Work_Option - (Opt : String; Immediate : Boolean; Load_Lib : Boolean) return Boolean; + function Decode_Work_Option (Opt : String) return Boolean; -- Get the chain of libraries. Can be used only to read (it musn't be -- modified). |