Better logging

2018-01-31 02:36:11 +01:00
parent de6df7b289
commit 8dbc94afe0
4 changed files with 36 additions and 9 deletions
@@ -1,3 +1,4 @@
+with Ada.Directories;
 with Ada.Finalization;

 package Alire.OS_Lib is
@@ -16,6 +17,10 @@ package Alire.OS_Lib is
   
   function Enter_Folder (Path : String) return Folder_Guard;
   
+   function "/" (L, R : String) return String is
+     (Ada.Directories.Compose (L, R));
+   --  Shorthand for path composition
+   
 private
   
   type Folder_Guard (Original_Len : Positive) is new Ada.Finalization.Limited_Controlled with record