aboutsummaryrefslogtreecommitdiff
path: root/guix
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2015-09-28 21:32:17 +0200
committerLudovic Courtès <ludo@gnu.org>2015-09-28 22:54:04 +0200
commit16748d80158875ae4cd54270be683fcf9c5d5169 (patch)
treed814296cd544ea49a751f9d8de168ae23586fff5 /guix
parentdf0a3b7f9ee8b5134ffedc58dc5e0ae761c45e25 (diff)
downloadgnu-guix-16748d80158875ae4cd54270be683fcf9c5d5169.tar
gnu-guix-16748d80158875ae4cd54270be683fcf9c5d5169.tar.gz
store: Add 'query-failed-paths' and 'clear-failed-paths' RPCs.
Suggested by Mark H Weaver <mhw@netris.org>. * guix/store.scm (query-failed-paths, clear-failed-paths): New procedures. * tests/guix-daemon.sh: Add test with daemon started with --cache-failures.
Diffstat (limited to 'guix')
-rw-r--r--guix/store.scm15
1 files changed, 15 insertions, 0 deletions
diff --git a/guix/store.scm b/guix/store.scm
index 5f37e72589..c4e3573711 100644
--- a/guix/store.scm
+++ b/guix/store.scm
@@ -67,6 +67,8 @@
add-to-store
build-things
build
+ query-failed-paths
+ clear-failed-paths
add-temp-root
add-indirect-root
add-permanent-root
@@ -889,6 +891,19 @@ PATHS---i.e., PATHS and all their dependencies."
(and (export-path server head port #:sign? sign?)
(loop tail))))))
+(define-operation (query-failed-paths)
+ "Return the list of store items for which a build failure is cached.
+
+The result is always the empty list unless the daemon was started with
+'--cache-failures'."
+ store-path-list)
+
+(define-operation (clear-failed-paths (store-path-list items))
+ "Remove ITEMS from the list of cached build failures.
+
+This makes sense only when the daemon was started with '--cache-failures'."
+ boolean)
+
(define* (register-path path
#:key (references '()) deriver prefix
state-directory)