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/ghdldrv/ghdlprint.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/ghdldrv/ghdlprint.adb')
-rw-r--r-- | src/ghdldrv/ghdlprint.adb | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/src/ghdldrv/ghdlprint.adb b/src/ghdldrv/ghdlprint.adb index 9aac16824..97689082a 100644 --- a/src/ghdldrv/ghdlprint.adb +++ b/src/ghdldrv/ghdlprint.adb @@ -886,7 +886,7 @@ package body Ghdlprint is for I in Args'Range loop -- Load the file. Id := Get_Identifier (Args (I).all); - Fe := Files_Map.Load_Source_File (Local_Id, Id); + Fe := Files_Map.Read_Source_File (Local_Id, Id); if Fe = No_Source_File_Entry then Error ("cannot open file " & Args (I).all); raise Compile_Error; @@ -1080,7 +1080,7 @@ package body Ghdlprint is for I in Args'Range loop -- Load the file. Id := Get_Identifier (Args (I).all); - Fe := Files_Map.Load_Source_File (Local_Id, Id); + Fe := Files_Map.Read_Source_File (Local_Id, Id); if Fe = No_Source_File_Entry then Error ("cannot open file " & Args (I).all); raise Compile_Error; @@ -1206,7 +1206,7 @@ package body Ghdlprint is for I in Files'Range loop Id := Get_Identifier (Files (I).all); - Fe := Files_Map.Load_Source_File (Local_Id, Id); + Fe := Files_Map.Read_Source_File (Local_Id, Id); if Fe = No_Source_File_Entry then Error ("cannot open file " & Files (I).all); raise Compile_Error; @@ -1350,7 +1350,7 @@ package body Ghdlprint is -- Parse all files. for I in Files'Range loop Id := Get_Identifier (Files_Name (I).all); - File := Files_Map.Load_Source_File (Libraries.Local_Directory, Id); + File := Files_Map.Read_Source_File (Libraries.Local_Directory, Id); if File = No_Source_File_Entry then Error ("cannot open " & Image (Id)); return; @@ -1583,7 +1583,7 @@ package body Ghdlprint is -- Parse all files. for I in Files'Range loop Id := Get_Identifier (Files_Name (I).all); - File := Load_Source_File (Libraries.Local_Directory, Id); + File := Read_Source_File (Libraries.Local_Directory, Id); if File = No_Source_File_Entry then Error ("cannot open " & Image (Id)); return; |