blob: 68fc654ae646137e3101c3c2119427d8aa82f7ea (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
|
(define-module (guix-build-coordinator datastore abstract)
#:use-module (oop goops)
#:export (<abstract-datastore>
datastore-update
datastore-store-derivation
datastore-store-build
datastore-list-agents
datastore-find-agent
datastore-new-agent
datastore-new-agent-password
datastore-list-agent-builds
datastore-agent-password-exists?
datastore-list-allocation-plan-builds))
(define-class <abstract-datastore> ())
(define-generic datastore-store-derivation)
(define-generic datastore-store-build)
(define-generic datastore-new-agent)
(define-generic datastore-list-agents)
(define-generic datastore-find-agent)
(define-generic datastore-new-agent-password)
(define-generic datastore-update)
(define-generic datastore-agent-password-exists?)
(define-generic datastore-agent-list-unprocessed-builds)
(define-generic datastore-list-agent-builds)
(define-generic datastore-agent-replace-build-allocation-plan)
(define-generic datastore-list-allocation-plan-builds)
|