WIP: fix failure syncing softlinks

alire-project · Aug 30, 2024 · 8b99353 · 8b99353
1 parent d296745
commit 8b99353
Show file tree

Hide file tree

Showing 2 changed files with 9 additions and 11 deletions.
diff --git a/deps/den b/deps/den
diff --git a/src/alire/alire-builds.adb b/src/alire/alire-builds.adb
@@ -7,7 +7,7 @@ with Alire.Paths.Vault;
 with Alire.Roots;
 with Alire.Settings.Builtins;
 
-with GNATCOLL.VFS;
+with Den.Filesystem;
 
 package body Alire.Builds is
 
@@ -56,16 +56,14 @@ package body Alire.Builds is
                   Simple_Logging.Activity
                     ("Syncing " & Release.Milestone.TTY_Image)
                     with Unreferenced;
-         Success : Boolean := False;
-         use GNATCOLL.VFS;
       begin
-         GNATCOLL.VFS.Copy
-           (Create (+Src),
-            +Dst,
-            Success);
-
-         Assert (Success,
-                 "Could not sync build dir from " & Src & " to " & Dst);
+         Den.Filesystem.Create_Directory (Dst);
+         Den.Filesystem.Copy (Src, Dst);
+      exception
+         when E : others =>
+            Log_Exception (E);
+            Raise_Checked_Error
+              ("Could not sync build dir from " & Src & " to " & Dst);
       end;
 
       --  At this point we can generate the final crate configuration
+138 −0		src/den-filesystem.adb
+23 −2		src/den-filesystem.ads
+7 −2		src/den.adb
+2 −1		src/den.ads
+3 −0		src/denc.h
+6 −0		src/unix/denc__unix.cpp