From 6af6231b7423f6c7dfacfa5ba73d1be65ff5183d Mon Sep 17 00:00:00 2001 From: Christopher Baines Date: Mon, 27 Apr 2020 20:18:40 +0100 Subject: Return a boolean value for processed --- guix-build-coordinator/datastore/sqlite.scm | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/guix-build-coordinator/datastore/sqlite.scm b/guix-build-coordinator/datastore/sqlite.scm index c21ef78..aede98c 100644 --- a/guix-build-coordinator/datastore/sqlite.scm +++ b/guix-build-coordinator/datastore/sqlite.scm @@ -524,7 +524,11 @@ WHERE uuid = :uuid"))) `((uuid . ,uuid) (derivation-name . ,derivation_name) (priority . ,priority) - (processed . ,processed)))))) + (processed? . ,(cond + ((eq? 0 processed) #f) + ((eq? 1 processed) #t) + (else + (error "unknown processed value"))))))))) (sqlite-reset statement) result))))) -- cgit v1.2.3