89b524ab58
This patch moves Guile modules shipped as a Guix channel under the modules directory. The rationale behind this is that we are probably adding unwanted files into Guile's load path, such as the news file and possible scripts that could be added to the channel repository in the future. * guix-channel (channel): Set directory field. * nongnu/*: Move under modules/nongnu. * nonguix/*: Move under modules/nonguix.
25 lines
822 B
Scheme
25 lines
822 B
Scheme
;;; SPDX-License-Identifier: GPL-3.0-or-later
|
|
;;; Copyright © 2019 Pierre Neidhardt <mail@ambrevar.xyz>
|
|
;;; Copyright © 2020 Jonathan Brielmaier <jonathan.brielmaier@web.de>
|
|
|
|
(define-module (nonguix utils)
|
|
#:use-module (srfi srfi-26)
|
|
#:use-module (ice-9 match)
|
|
#:use-module (ice-9 textual-ports)
|
|
#:use-module (ice-9 popen)
|
|
#:use-module (guix utils)
|
|
#:use-module (guix packages))
|
|
|
|
(define-public (to32 package64)
|
|
"Build package for i686-linux.
|
|
Only x86_64-linux and i686-linux are supported.
|
|
- If i686-linux, return the package unchanged.
|
|
- If x86_64-linux, return the 32-bit version of the package."
|
|
(match (%current-system)
|
|
("x86_64-linux"
|
|
(package
|
|
(inherit package64)
|
|
(arguments `(#:system "i686-linux"
|
|
,@(package-arguments package64)))))
|
|
(_ package64)))
|