From a936915b743ebc96dc3b1577fe7d0f3b668176d0 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Reynir=20Bj=C3=B6rnsson?= Date: Fri, 22 Jan 2021 14:21:15 +0100 Subject: [PATCH] Also add the new function to the interface... --- lib/model.mli | 3 +++ 1 file changed, 3 insertions(+) diff --git a/lib/model.mli b/lib/model.mli index cc15a68..7081f74 100644 --- a/lib/model.mli +++ b/lib/model.mli @@ -11,6 +11,9 @@ val build_artifacts : Builder_db.id -> Caqti_lwt.connection -> val build : Uuidm.t -> Caqti_lwt.connection -> (Builder_db.id * Builder_db.Build.t, [> error ]) result Lwt.t +val build_exists : Uuidm.t -> Caqti_lwt.connection -> + (bool, [> error ]) result Lwt.t + val job : string -> Caqti_lwt.connection -> ((Builder_db.id * Builder_db.Build.Meta.t) list, [> error ]) result Lwt.t