diff options
| author | Tristan Gingold <tgingold@free.fr> | 2017-10-05 20:41:43 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2017-10-05 20:41:43 +0200 |
| commit | f3927d7bcc1540f8ea194b04b302260b03112de6 (patch) | |
| tree | 61e9eda4d786d339e37bb8a0d04d714167cfe50f /src/libraries.adb | |
| parent | dad47583a6781fcfb3fdba82c36892331fc4bffd (diff) | |
| download | ghdl-f3927d7bcc1540f8ea194b04b302260b03112de6.tar.gz ghdl-f3927d7bcc1540f8ea194b04b302260b03112de6.tar.bz2 ghdl-f3927d7bcc1540f8ea194b04b302260b03112de6.zip | |
files_map: rename Load_Source_File to Read_Source_File.
Diffstat (limited to 'src/libraries.adb')
| -rw-r--r-- | src/libraries.adb | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/libraries.adb b/src/libraries.adb index 4186fd4da..b4b631f07 100644 --- a/src/libraries.adb +++ b/src/libraries.adb @@ -422,7 +422,7 @@ package body Libraries is (" from " & Image (Dir) & Image (File_Id)); end if; - File := Files_Map.Load_Source_File (Dir, File_Id); + File := Files_Map.Read_Source_File (Dir, File_Id); if File = No_Source_File_Entry then -- Not found. Set_Date (Library, Date_Valid'First); @@ -1637,7 +1637,7 @@ package body Libraries is is Fe : Source_File_Entry; begin - Fe := Files_Map.Load_Source_File (Local_Directory, File_Name); + Fe := Files_Map.Read_Source_File (Local_Directory, File_Name); if Fe = No_Source_File_Entry then Error_Msg_Option ("cannot open " & Image (File_Name)); return Null_Iir; @@ -1732,7 +1732,7 @@ package body Libraries is -- Load the file in memory. Design_File := Get_Design_File (Design_Unit); - Fe := Files_Map.Load_Source_File + Fe := Files_Map.Read_Source_File (Get_Design_File_Directory (Design_File), Get_Design_File_Filename (Design_File)); if Fe = No_Source_File_Entry then |