aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--guix-data-service/jobs/load-new-guix-revision.scm15
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