03/03: fixup! gnu: Add zig-wlroots.

[guix-commits]

hako pushed a commit to branch wip-zig-bootstrap
in repository guix.

commit ffab5d62361ebd7a27a6efc782d3e295170501a5
Author: Hilton Chain <hako@ultrarare.space>
AuthorDate: Tue Dec 31 00:30:02 2024 +0800

    fixup! gnu: Add zig-wlroots.
    
    Change-Id: Id80a11c98f4fccc2736f2789287147a1c5b37e62
---
 gnu/packages/zig-xyz.scm | 19 +++++++++++++++++--
 1 file changed, 17 insertions(+), 2 deletions(-)

diff --git a/gnu/packages/zig-xyz.scm b/gnu/packages/zig-xyz.scm
index 3c10ffa06e..3fc5fade45 100644
--- a/gnu/packages/zig-xyz.scm
+++ b/gnu/packages/zig-xyz.scm
@@ -478,10 +478,25 @@ interface.")
                 "0aa9xck8al1n27dzc9zkm7xp88g87x7h5cl2jlpyxjgbgahancr8"))))
     (build-system zig-build-system)
     (arguments
-     (list #:zig-build-flags
+     (list #:zig-release-type "safe"
+           #:zig-build-flags
            #~(list "-Denable-tests")
            #:zig-test-flags
-           #~(list "-Denable-tests")))
+           #~(list "-Denable-tests")
+           #:phases
+           #~(modify-phases %standard-phases
+               (add-after 'build 'enter-tinywl-directory
+                 (lambda _
+                   (chdir "tinywl")))
+               (add-after 'enter-tinywl-directory 'build-tinywl
+                 (lambda args
+                   (apply (assoc-ref %standard-phases 'build)
+                          `(,@args #:zig-build-flags ()))))
+               (add-after 'build-tinywl 'install-tinywl
+                 (assoc-ref %standard-phases 'install))
+               (add-after 'install-tinywl 'leave-tinywl-directory
+                 (lambda _
+                   (chdir ".."))))))
     (propagated-inputs
      (list wlroots
            zig-pixman