feat: REPL development tool + naming drift fixes + HITL gateways

REPL tool:
- ~/.opencode/bin/repl — connects to running daemon, evaluates Lisp forms,
  returns results. Usage: repl '(+ 1 2)' or via stdin.
- Server-side handler in programming-repl skill registers for :repl-eval
  sensor, bypasses LLM pipeline, writes result back through reply-stream.
- Core provides pre-reason-handler registry (register-pre-reason-handler)
  for skills to register custom sensors without modifying core code.

HITL gateway integration:
- hitl-handle-message: TUI, Telegram, and Signal gateways intercept
  approval/deny commands before they reach the LLM.
- hitl-create/hitl-approve/hitl-deny: in-memory HITL store with correlation
  tokens for gateway-agnostic approval.
- loop-gate-perceive detects HITL commands and blocks LLM processing.

Naming drift fixes (the complete batch):
- register-actuator vs actuator-register — fixed to register-actuator
- process-signal vs loop-process — alias added
- perceive-gate/reason-gate/act-gate vs loop-gate-* — aliases added
- initialize-actuators vs actuator-initialize — fixed to actuator-initialize
- initialize-all-skills vs skill-initialize-all — fixed to skill-initialize-all
- inject-stimulus alias added for backward compatibility
- All original gateway-manager inject-stimulus → stimulus-inject + HITL check

lisp/gateway-manager.lisp

@@ -25,12 +25,13 @@
                        (chat-id (cdr (assoc :id chat)))
                        (text (cdr (assoc :text message))))
                   (setf (getf (gethash "telegram" *gateway-configs*) :last-update-id) update-id)
-                  (when (and text chat-id)
-                    (log-message "TELEGRAM: Received message from ~a" chat-id)
-                    (inject-stimulus
-                     (list :type :EVENT
-                           :meta (list :source :telegram :chat-id (format nil "~a" chat-id))
-                           :payload (list :sensor :user-input :text text)))))))
+                   (when (and text chat-id)
+                     (log-message "TELEGRAM: Received message from ~a" chat-id)
+                     (unless (ignore-errors (hitl-handle-message text :telegram))
+                       (stimulus-inject
+                        (list :type :EVENT
+                              :meta (list :source :telegram :chat-id (format nil "~a" chat-id))
+                              :payload (list :sensor :user-input :text text)))))))
           (error (c) (log-message "TELEGRAM POLL ERROR: ~a" c))))))
 
 (defun telegram-send (action context)
@@ -69,12 +70,13 @@
                        (source (cdr (assoc :source envelope)))
                        (data-message (cdr (assoc :data-message envelope)))
                        (text (cdr (assoc :message data-message))))
-                  (when (and source text)
-                    (log-message "SIGNAL: Received message from ~a" source)
-                    (inject-stimulus
-                     (list :type :EVENT
-                           :meta (list :source :signal :chat-id source)
-                           :payload (list :sensor :user-input :text text))))))))
+                   (when (and source text)
+                     (log-message "SIGNAL: Received message from ~a" source)
+                     (unless (ignore-errors (hitl-handle-message text :signal))
+                       (stimulus-inject
+                        (list :type :EVENT
+                              :meta (list :source :signal :chat-id source)
+                              :payload (list :sensor :user-input :text text))))))))
         (error (c) (log-message "SIGNAL POLL ERROR: ~a" c))))))
 
 (defun signal-send (action context)