From f3927d7bcc1540f8ea194b04b302260b03112de6 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Thu, 5 Oct 2017 20:41:43 +0200
Subject: files_map: rename Load_Source_File to Read_Source_File.

---
 src/ghdldrv/ghdlxml.adb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/ghdldrv/ghdlxml.adb')

diff --git a/src/ghdldrv/ghdlxml.adb b/src/ghdldrv/ghdlxml.adb
index 96356ddf2..de2e383ba 100644
--- a/src/ghdldrv/ghdlxml.adb
+++ b/src/ghdldrv/ghdlxml.adb
@@ -491,7 +491,7 @@ package body Ghdlxml 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;
-- 
cgit v1.2.3