diff options
| author | Tristan Gingold <tgingold@free.fr> | 2020-04-10 10:44:39 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2020-04-10 10:44:39 +0200 |
| commit | 5071e39d5dd239577dae40782a7dc69033e8920c (patch) | |
| tree | 05c701abbc90ce5401be412ecce392cd6b695fae /src/ghdldrv/ghdldrv.adb | |
| parent | bb75c67563d6dc8920507909779f394d6760dd81 (diff) | |
| download | ghdl-5071e39d5dd239577dae40782a7dc69033e8920c.tar.gz ghdl-5071e39d5dd239577dae40782a7dc69033e8920c.tar.bz2 ghdl-5071e39d5dd239577dae40782a7dc69033e8920c.zip | |
grt and ghdldrv: extract grt-exec.lst from grt.lst. For #640
Diffstat (limited to 'src/ghdldrv/ghdldrv.adb')
| -rw-r--r-- | src/ghdldrv/ghdldrv.adb | 11 |
1 files changed, 9 insertions, 2 deletions
diff --git a/src/ghdldrv/ghdldrv.adb b/src/ghdldrv/ghdldrv.adb index c382f22bf..e15123ec6 100644 --- a/src/ghdldrv/ghdldrv.adb +++ b/src/ghdldrv/ghdldrv.adb @@ -1013,6 +1013,13 @@ package body Ghdldrv is end loop; end Bind_Anaelab; + -- Add PFX.lst from the install lib directory. + procedure Add_Lib_File_List (Pfx : String) is + begin + Add_File_List (Get_Machine_Path_Prefix & Directory_Separator + & Pfx & List_Suffix, False); + end Add_Lib_File_List; + procedure Link (Add_Std : Boolean; Disp_Only : Boolean) is Last_File : Natural; @@ -1024,8 +1031,8 @@ package body Ghdldrv is Add_File_List (Filelist_Name.all, True); end if; Last_File := Filelist.Last; - Add_File_List (Get_Machine_Path_Prefix & Directory_Separator - & "grt" & List_Suffix, False); + Add_Lib_File_List ("grt"); + Add_Lib_File_List ("grt-exec"); -- call the linker declare |