diff options
author | Tristan Gingold <tgingold@free.fr> | 2023-04-24 19:29:44 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2023-04-24 19:29:44 +0200 |
commit | 6a7a3cbcf61cb5c2882265a21a8c4b130614786e (patch) | |
tree | 9ebea0f73302160eb1c8ccfd1fa573b00f4d75a6 /src/libraries.ads | |
parent | c302870a98bec0fa265cf92cec69e7807b1d09bd (diff) | |
download | ghdl-6a7a3cbcf61cb5c2882265a21a8c4b130614786e.tar.gz ghdl-6a7a3cbcf61cb5c2882265a21a8c4b130614786e.tar.bz2 ghdl-6a7a3cbcf61cb5c2882265a21a8c4b130614786e.zip |
libraries(Get_Library): add parameter Force.
Diffstat (limited to 'src/libraries.ads')
-rw-r--r-- | src/libraries.ads | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/src/libraries.ads b/src/libraries.ads index 1684afaf0..7e6469691 100644 --- a/src/libraries.ads +++ b/src/libraries.ads @@ -114,7 +114,10 @@ package Libraries is -- Get or create a library from an identifier. -- LOC is used only to report errors. - function Get_Library (Ident : Name_Id; Loc : Location_Type) + -- If FORCE is true, then the library is created even if it doesn't exist. + function Get_Library (Ident: Name_Id; + Loc : Location_Type; + Force : Boolean := False) return Iir_Library_Declaration; -- Add or replace an design unit in the work library. |