diff options
| author | Christopher Baines <mail@cbaines.net> | 2024-07-18 13:58:21 +0100 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2024-07-18 13:58:21 +0100 |
| commit | 0ca9c3f64fc7e70d983a5eac8cc8e58b1309ea03 (patch) | |
| tree | 52f53d2b6608cecfda2ab08fcaa79aef5c83f6b9 | |
| parent | b22834dae7f48363cc924e3f5084a2afbd230c7f (diff) | |
| download | data-service-0ca9c3f64fc7e70d983a5eac8cc8e58b1309ea03.tar data-service-0ca9c3f64fc7e70d983a5eac8cc8e58b1309ea03.tar.gz | |
Catch and ignore the new cross build derivation errors
| -rw-r--r-- | guix-data-service/jobs/load-new-guix-revision.scm | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/guix-data-service/jobs/load-new-guix-revision.scm b/guix-data-service/jobs/load-new-guix-revision.scm index 7945a19..672577f 100644 --- a/guix-data-service/jobs/load-new-guix-revision.scm +++ b/guix-data-service/jobs/load-new-guix-revision.scm @@ -473,6 +473,10 @@ 'misc-error (lambda () (guard (c ((package-cross-build-system-error? c) + #f) + ((package-unsupported-target-error? c) + #f) + ((unsupported-cross-compilation-target-error? c) #f)) (let ((derivation (if target @@ -579,6 +583,17 @@ (use-modules (guix platform))) inf) + (unless (inferior-eval + '(defined? 'package-unsupported-target-error? + (resolve-module '(guix packages))) + inf) + (inferior-eval + '(define package-unsupported-target-error? (const #f)) + inf) + (inferior-eval + '(define unsupported-cross-compilation-target-error? (const #f)) + inf)) + (format (current-error-port) "heap size: ~a MiB~%" (round |