From ddb274c644791687858a3b8dfd259fe3b6e9ca24 Mon Sep 17 00:00:00 2001
From: Hans Dijkema <hans@dijkewijk.nl>
Date: Sun, 28 Jun 2026 23:44:37 +0200
Subject: [PATCH] class definition: close method and class documentation.

---
 class.rkt         | 3 +++
 scrbl/class.scrbl | 5 +++++
 2 files changed, 8 insertions(+)

diff --git a/class.rkt b/class.rkt
index 77bcb15..fa51878 100644
--- a/class.rkt
+++ b/class.rkt
@@ -20,6 +20,9 @@
     (define/public (handle)
       ksh)
 
+    (define/public (close)
+      (ks-close ksh))
+
     (define/public (set! key val)
       (ks-set! ksh key val)
       this)
diff --git a/scrbl/class.scrbl b/scrbl/class.scrbl
index fa6972c..95e8c11 100644
--- a/scrbl/class.scrbl
+++ b/scrbl/class.scrbl
@@ -22,6 +22,11 @@ Opens or creates a keystore using @racket[file]. The meaning of
 @racket[file] is the same as for @racket[ks-open].
 }
 
+@defmethod[(close) boolean?]{
+
+Closes the keystore connection.
+}
+
 @defmethod[(handle) keystore?]{
 
 Returns the underlying keystore handle.