more cleanups & docs

This commit is contained in:
2025-08-10 17:02:47 +02:00
parent d278185ff3
commit 3ed6bafa84
10 changed files with 54 additions and 25 deletions

View File

@@ -8,15 +8,13 @@
(defn make-thought
"Helper function to make thought object.
You may want `register-thought!` instead."
[operator & {:keys [data ext-contract ext-stages]
:or {data {} ext-contract {}
[operator & {:keys [data ext-stages]
:or {data {}
ext-stages [[:PRE-EXECUTE] [:EXECUTE] [:POST-EXECUTE]]}}]
(hash-map :operator operator
:data data
:ext-contract ext-contract
:ext-stages ext-stages
:return []
:transient nil))
:return []))
(defn register-thought!
"Create a thought and register it in the state.