nightshade

commit 93b2c041d34f89260c86c4d89c1fe77bcbe2dafc
parent 78f101e2b0ba800c418fe9279f2c3bd2e2d12601
Author: citbl <citbl@citbl.org>
Date:   Thu, 25 Jun 2026 23:34:14 +1000

minor rename

Diffstat:
M
src/nightshade.adb
 | 
4
++--
M
src/utils.adb
 | 
4
++--
M
src/utils.ads
 | 
2
+-

3 files changed, 5 insertions(+), 5 deletions(-)
diff --git a/src/nightshade.adb b/src/nightshade.adb
@@ -20,8 +20,8 @@ begin
 
    declare
       File_Name     : constant String := Argument (1);
-      Buffer        : constant String := Utils.Load_Contents (File_Name);
-      Src_Ref       : constant Types.Source_Ref := new String'(Buffer);
+      File_Contents : constant String := Utils.Read_File (File_Name);
+      Src_Ref       : constant Types.Source_Ref := new String'(File_Contents);
       File_Name_Ref : constant Types.File_Name_Ref := new String'(File_Name);
       L             : Lexer.Lexer := Lexer.Init (File_Name_Ref, Src_Ref);
    begin
diff --git a/src/utils.adb b/src/utils.adb
@@ -3,7 +3,7 @@ with Ada.Strings.Unbounded;         use Ada.Strings.Unbounded;
 with Ada.Strings.Unbounded.Text_IO; use Ada.Strings.Unbounded.Text_IO;
 
 package body Utils is
-   function Load_Contents (File_Name : String) return String is
+   function Read_File (File_Name : String) return String is
       F       : File_Type;
       Content : Unbounded_String := Null_Unbounded_String;
    begin
@@ -24,7 +24,7 @@ package body Utils is
 
       return To_String (Content);
 
-   end Load_Contents;
+   end Read_File;
 
    -----------
    -- print --
diff --git a/src/utils.ads b/src/utils.ads
@@ -1,6 +1,6 @@
 with Types; use Types;
 
 package Utils is
-   function Load_Contents (File_Name : String) return String;
+   function Read_File (File_Name : String) return String;
    procedure Print_AST (Decls : Declaration_Vectors.Vector);
 end Utils;