diff options
| -rw-r--r-- | guix/gexp.scm | 17 |
1 files changed, 6 insertions, 11 deletions
diff --git a/guix/gexp.scm b/guix/gexp.scm index 2a4b36519c..62973460f2 100644 --- a/guix/gexp.scm +++ b/guix/gexp.scm @@ -1456,17 +1456,12 @@ TARGET, a GNU triplet." (ungexp (* total 2)) entry) - (ungexp-splicing - (if target - (gexp ((with-target (ungexp target) - (lambda () - (compile-file entry - #:output-file output - #:opts - %auto-compilation-options))))) - (gexp ((compile-file entry - #:output-file output - #:opts %auto-compilation-options))))) + (with-target (ungexp (or target (gexp %host-type))) + (lambda () + (compile-file entry + #:output-file output + #:opts + %auto-compilation-options))) (+ 1 processed)))) |