build-sysem/mix: Preserve code paths.
* guix/build/mix-build-system.scm (build): Preserve code paths. Change-Id: Ia43e79385a536de98ae026893e1bda2a8416562c Signed-off-by: Andrew Tropin <andrew@trop.in>
This commit is contained in:
parent
d6e81e01d9
commit
b3c8285127
1 changed files with 7 additions and 2 deletions
|
@ -1,5 +1,6 @@
|
|||
;;; GNU Guix --- Functional package management for GNU
|
||||
;;; Copyright © 2023 Pierre-Henry Fröhring <contact@phfrohring.com>
|
||||
;;; Copyright © 2024 Igor Goryachev <igor@goryachev.org>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
|
@ -102,13 +103,17 @@ See: https://hexdocs.pm/mix/1.15.7/Mix.html#module-environment-variables"
|
|||
"Builds the Mix project."
|
||||
(for-each (lambda (mix-env)
|
||||
(setenv "MIX_ENV" mix-env)
|
||||
(invoke "mix" "compile" "--no-deps-check"))
|
||||
(invoke "mix" "compile" "--no-deps-check"
|
||||
"--no-prune-code-paths"))
|
||||
mix-environments))
|
||||
|
||||
(define* (check #:key (tests? #t) #:allow-other-keys)
|
||||
"Test the Mix project."
|
||||
(if tests?
|
||||
(invoke "mix" "test" "--no-deps-check")
|
||||
(begin
|
||||
(setenv "MIX_ENV" "test")
|
||||
(invoke "mix" "do" "compile" "--no-deps-check" "--no-prune-code-paths" "+"
|
||||
"test" "--no-deps-check"))
|
||||
(format #t "tests? = ~a~%" tests?)))
|
||||
|
||||
(define* (remove-mix-dirs . _)
|
||||
|
|
Reference in a new issue