about summary refs log tree commit diff
diff options
context:
space:
mode:
authorArun Isaac2026-04-18 01:12:53 +0100
committerArun Isaac2026-04-19 22:12:21 +0100
commit560a5057d49e9d1ed6509d580fc32f2c9225ba62 (patch)
treea4e9997a8059666f3fdfdaee34970bcdd9901a9d
parentc1770f9740c318c3fdfc0d64a7d1b4b2c33c661f (diff)
downloadkaagum-560a5057d49e9d1ed6509d580fc32f2c9225ba62.tar.gz
kaagum-560a5057d49e9d1ed6509d580fc32f2c9225ba62.tar.lz
kaagum-560a5057d49e9d1ed6509d580fc32f2c9225ba62.zip
Document client-request-id field of <state> record type.
-rw-r--r--kaagum/tea.scm16
1 files changed, 9 insertions, 7 deletions
diff --git a/kaagum/tea.scm b/kaagum/tea.scm
index 3e7057b..888c052 100644
--- a/kaagum/tea.scm
+++ b/kaagum/tea.scm
@@ -75,13 +75,15 @@
           (rejected-tools session-rejected-tools lensed)))
 
 (define-record-type* (<state> state state?)
-  (fields (client-request-id state-client-request-id lensed)
-          (agent-request-id state-agent-request-id lensed)
-          (next-session-id state-next-session-id lensed)
-          ;; Association list mapping agent request IDs to tool calls for which
-          ;; permission is sought
-          (requests-alist state-requests-alist lensed)
-          (sessions state-sessions lensed)))
+  (fields
+   ;; ID of the client request being served
+   (client-request-id state-client-request-id lensed)
+   (agent-request-id state-agent-request-id lensed)
+   (next-session-id state-next-session-id lensed)
+   ;; Association list mapping agent request IDs to tool calls for which
+   ;; permission is sought
+   (requests-alist state-requests-alist lensed)
+   (sessions state-sessions lensed)))
 
 (define (state-cwd session-id)
   "Return a lens to focus on current working directory of session with