CHORE: Prepare for Signal Gateway implementation

This commit is contained in:
2026-04-11 15:48:22 -04:00
parent 8ba3532067
commit 975a11da79
8 changed files with 192 additions and 39 deletions

View File

@@ -16,10 +16,18 @@ We begin by ensuring we are in the correct package.
(in-package :org-agent)
#+end_src
** Actuator Registry
Global registry mapping target keywords to their physical actuator functions.
#+begin_src lisp :tangle ../src/protocol.lisp
(defvar *actuator-registry* (make-hash-table :test 'equal)
"Global registry mapping target keywords to their physical actuator functions.")
#+end_src
** Actuator Registration
Registers an actuator function. Actuators receive two arguments: (ACTION CONTEXT).
#+begin_src lisp :tangle ../src/protocol.lisp
(defun register-actuator (name fn)
"Registers an actuator function. Actuators receive two arguments: (ACTION CONTEXT)."
(setf (gethash name *actuator-registry*) fn))