amaharaneko/guix-mirrors
1
1
Fork 0
mirror of https://codeberg.org/guix/guix.git synced 2025-10-02 02:15:12 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

build/pyproject: Fix indentation.

Browse source 
* guix/build/pyproject-build-system.scm: Re-indent file with Emacs.

Change-Id: Ie8a119ce9cf4beccffde93674adb98dc07462ea7
Signed-off-by: Sharlatan Hellseher <sharlatanus@gmail.com>
This commit is contained in:
Maxim Cournoyer 2025-06-17 18:27:12 +01:00 • committed by Sharlatan Hellseher
parent f3f42af8ae
commit 7b65bc85cd
No known key found for this signature in database
GPG key ID: 76D727BFF62CD2B5
1 changed files with 21 additions and 21 deletions
Download patch file Download diff file Expand all files Collapse all files

42
guix/build/pyproject-build-system.scm
View file

@ -78,11 +78,11 @@
;; Raised when 'check cannot find a valid test system in the inputs. ;; Raised when 'check cannot find a valid test system in the inputs.
(define-condition-type &test-system-not-found &python-build-error (define-condition-type &test-system-not-found &python-build-error
test-system-not-found?) test-system-not-found?)
;; Raised when multiple wheels are created by 'build. ;; Raised when multiple wheels are created by 'build.
(define-condition-type &cannot-extract-multiple-wheels &python-build-error (define-condition-type &cannot-extract-multiple-wheels &python-build-error
cannot-extract-multiple-wheels?) cannot-extract-multiple-wheels?)
;; Raised, when no wheel has been built by the build system. ;; Raised, when no wheel has been built by the build system.
(define-condition-type &no-wheels-built &python-build-error no-wheels-built?) (define-condition-type &no-wheels-built &python-build-error no-wheels-built?)
@ -102,8 +102,8 @@
pyproject.toml pyproject.toml
'("build-system" "backend-path"))) '("build-system" "backend-path")))
(use-backend-path (call-with-output-string (use-backend-path (call-with-output-string
(cut write-json (cut write-json
(or backend-path auto-backend-path '()) <>))) (or backend-path auto-backend-path '()) <>)))
;; There is no easy way to get data from Guile into Python via ;; There is no easy way to get data from Guile into Python via
;; s-expressions, but we have JSON serialization already, which Python ;; s-expressions, but we have JSON serialization already, which Python
;; also supports out-of-the-box. ;; also supports out-of-the-box.
@ -122,25 +122,25 @@
auto-build-backend auto-build-backend
"setuptools.build_meta"))) "setuptools.build_meta")))
(format #t (format #t
(string-append (string-append
"Using '~a' to build wheels, auto-detected '~a', override '~a'.~%" "Using '~a' to build wheels, auto-detected '~a', override '~a'.~%"
"Prepending '~a' to sys.path, auto-detected '~a', override '~a'.~%") "Prepending '~a' to sys.path, auto-detected '~a', override '~a'.~%")
use-build-backend auto-build-backend build-backend use-build-backend auto-build-backend build-backend
use-backend-path auto-backend-path backend-path) use-backend-path auto-backend-path backend-path)
(mkdir-p wheel-dir) (mkdir-p wheel-dir)
;; Call the PEP 517 build function, which drops a .whl into wheel-dir. ;; Call the PEP 517 build function, which drops a .whl into wheel-dir.
(invoke "python" "-c" (invoke "python" "-c"
"import sys, importlib, json "import sys, importlib, json
backend_path = json.loads (sys.argv[1]) or [] backend_path = json.loads (sys.argv[1]) or []
backend_path.extend (sys.path) backend_path.extend (sys.path)
sys.path = backend_path sys.path = backend_path
config_settings = json.loads (sys.argv[4]) config_settings = json.loads (sys.argv[4])
builder = importlib.import_module(sys.argv[2]) builder = importlib.import_module(sys.argv[2])
builder.build_wheel(sys.argv[3], config_settings=config_settings)" builder.build_wheel(sys.argv[3], config_settings=config_settings)"
use-backend-path use-backend-path
use-build-backend use-build-backend
wheel-dir wheel-dir
config-settings))) config-settings)))
(define* (check #:key tests? test-backend test-flags #:allow-other-keys) (define* (check #:key tests? test-backend test-flags #:allow-other-keys)
"Run the test suite of a given Python package." "Run the test suite of a given Python package."
@ -261,12 +261,12 @@ builder.build_wheel(sys.argv[3], config_settings=config_settings)"
(scandir wheel-dir (scandir wheel-dir
(cut string-suffix? ".whl" <>))))) (cut string-suffix? ".whl" <>)))))
(cond (cond
((> (length wheels) 1) ((> (length wheels) 1)
;; This code does not support multiple wheels yet, because their ;; This code does not support multiple wheels yet, because their
;; outputs would have to be merged properly. ;; outputs would have to be merged properly.
(raise (condition (&cannot-extract-multiple-wheels)))) (raise (condition (&cannot-extract-multiple-wheels))))
((= (length wheels) 0) ((= (length wheels) 0)
(raise (condition (&no-wheels-built))))) (raise (condition (&no-wheels-built)))))
(for-each extract wheels)) (for-each extract wheels))
(let ((datadirs (map (cut string-append site-dir "/" <>) (let ((datadirs (map (cut string-append site-dir "/" <>)
(list-directories site-dir (list-directories site-dir
@ -349,7 +349,7 @@ and return write it to PATH/NAME."
import sys import sys
import ~a as mod import ~a as mod
sys.exit (mod.~a ())~%" interpreter module function))) sys.exit (mod.~a ())~%" interpreter module function)))
(chmod file-path #o755))) (chmod file-path #o755)))
(let* ((site-dir (site-packages inputs outputs)) (let* ((site-dir (site-packages inputs outputs))
(out (assoc-ref outputs "out")) (out (assoc-ref outputs "out"))