fix: P3 — normalize variable name drift across core modules
Some checks failed
Deploy (Gitea) / deploy (push) Failing after 2s
Some checks failed
Deploy (Gitea) / deploy (push) Failing after 2s
- *memory* → *memory-store* (context, perceive tests, defpackage export) - *skills-registry* → *skill-registry* (context, reason) - *logs-lock* → *log-lock*, *system-logs* → *log-buffer* (context → defpackage) - *cognitive-tools* → *cognitive-tool-registry* (act) - deterministic-verify → cognitive-verify (act → reason) These were runtime errors — referenced variables that don't exist. Harmless until called, but would crash if those code paths were hit.
This commit is contained in:
@@ -67,7 +67,7 @@
|
||||
(depth (getf context :depth 0))
|
||||
(meta (getf context :meta))
|
||||
(source (getf meta :source))
|
||||
(tool (gethash (string-downcase (string tool-name)) *cognitive-tools*)))
|
||||
(tool (gethash (string-downcase (string tool-name)) *cognitive-tool-registry*)))
|
||||
(if tool
|
||||
(handler-case
|
||||
(let* ((clean-args (if (and (listp tool-args) (listp (car tool-args))) (car tool-args) tool-args))
|
||||
@@ -105,7 +105,7 @@
|
||||
(feedback nil))
|
||||
(when approved
|
||||
(let* ((original-type (getf approved :type))
|
||||
(verified (deterministic-verify approved signal)))
|
||||
(verified (cognitive-verify approved signal)))
|
||||
(if (and (listp verified) (member (getf verified :type) '(:LOG :EVENT)) (not (member original-type '(:LOG :EVENT))))
|
||||
(progn
|
||||
(log-message "ACT BLOCKED: Action failed last-mile deterministic check.")
|
||||
|
||||
Reference in New Issue
Block a user