about summary refs log tree commit diff
diff options
context:
space:
mode:
authorArun Isaac2022-02-24 17:25:08 +0530
committerArun Isaac2022-02-28 17:41:09 +0530
commit05cac2662459a9432e4ab441069629ffea27a392 (patch)
tree051444e6de3b374a39f0b1da9c3941c70b3d54c9
parentd2119097703b7985d79b228da1e22431a6a50a01 (diff)
downloadguix-forge-05cac2662459a9432e4ab441069629ffea27a392.tar.gz
guix-forge-05cac2662459a9432e4ab441069629ffea27a392.tar.lz
guix-forge-05cac2662459a9432e4ab441069629ffea27a392.zip
forge: Export record type predicates.
Predicates are also a part of the public interface of a record type
and are sometimes required.

* forge/forge.scm: Export predicates forge-configuration?,
forge-project-configuration? and forge-derivation-job?.
* forge/laminar.scm: Export predicate forge-laminar-configuration?.
-rw-r--r--forge/forge.scm3
-rw-r--r--forge/laminar.scm1
2 files changed, 4 insertions, 0 deletions
diff --git a/forge/forge.scm b/forge/forge.scm
index fa6be5e..71af1ad 100644
--- a/forge/forge.scm
+++ b/forge/forge.scm
@@ -38,9 +38,11 @@
   #:use-module (forge webhook)
   #:export (forge-service-type
             forge-configuration
+            forge-configuration?
             forge-configuration-guix-daemon-uri
             forge-configuration-projects
             forge-project-configuration
+            forge-project-configuration?
             this-forge-project-configuration
             forge-project-configuration-name
             forge-project-configuration-user
@@ -50,6 +52,7 @@
             forge-project-configuration-ci-jobs
             forge-project-configuration-ci-jobs-trigger
             forge-derivation-job
+            forge-derivation-job?
             forge-derivation-job-name
             forge-derivation-job-run
             forge-derivation-job-after))
diff --git a/forge/laminar.scm b/forge/laminar.scm
index 262bbd1..8704d39 100644
--- a/forge/laminar.scm
+++ b/forge/laminar.scm
@@ -24,6 +24,7 @@
   #:use-module (guix records)
   #:export (forge-laminar-service-type
             forge-laminar-configuration
+            forge-laminar-configuration?
             forge-laminar-configuration-state-directory
             forge-laminar-configuration-jobs
             forge-laminar-job