fix: P3 — normalize variable name drift across core modules

- *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.

lisp/core-context.lisp

@@ -10,7 +10,7 @@
                  (when tag (unless (search tag (format nil "~a" (getf attrs :TAGS)) :test #'string-equal) (setf match nil)))
                  (when (and todo-state (not (equal state todo-state))) (setf match nil))
                  (when match (push obj results))))
-             *memory*)
+             *memory-store*)
     results))
 
 (defun context-active-projects ()
@@ -28,7 +28,7 @@
     (maphash (lambda (name skill)
                (declare (ignore name))
                (push (list :name (skill-name skill) :priority (skill-priority skill) :dependencies (skill-dependencies skill)) results))
-             *skills-registry*)
+             *skill-registry*)
     (sort results #'> :key (lambda (x) (getf x :priority)))))
 
 (defun context-skill-source (skill-name)
@@ -53,9 +53,9 @@ or nil if the heading is not found."
 (defun context-logs (&optional limit)
   "Retrieves the most recent lines from the harness's internal log."
   (let ((log-limit (or limit (ignore-errors (parse-integer (uiop:getenv "CONTEXT_LOG_LIMIT"))) 20)))
-    (bt:with-lock-held (*logs-lock*)
-      (let ((count (min log-limit (length *system-logs*)))) 
-        (subseq *system-logs* 0 count)))))
+    (bt:with-lock-held (*log-lock*)
+      (let ((count (min log-limit (length *log-buffer*)))) 
+        (subseq *log-buffer* 0 count)))))
 
 (defun context-object-render (obj &key (depth 1) (foveal-id nil) semantic-threshold (foveal-vector nil))
   "Recursively renders an org-object and its children to an Org string using a Foveal-Peripheral Hybrid model."
@@ -153,7 +153,7 @@ Privacy-filtered objects (matching bouncer-privacy-tags) are excluded."
 (in-suite vision-suite)
 
 (test test-foveal-rendering
-  (clrhash passepartout::*memory*)
+  (clrhash passepartout::*memory-store*)
   (let* ((ast '(:type :HEADLINE :properties (:ID "proj-root" :TITLE "Project" :TAGS ("project"))
                 :contents ((:type :HEADLINE :properties (:ID "node-foveal" :TITLE "Foveal Node")
                              :raw-content "FOVEAL CONTENT" :contents nil)
@@ -166,7 +166,7 @@ Privacy-filtered objects (matching bouncer-privacy-tags) are excluded."
       (is (not (search "PERIPHERAL CONTENT" output))))))
 
 (test test-awareness-budget
-  (clrhash passepartout::*memory*)
+  (clrhash passepartout::*memory-store*)
   (ingest-ast '(:type :HEADLINE :properties (:ID "p1" :TITLE "Project 1" :TAGS ("project")) :contents nil))
   (ingest-ast '(:type :HEADLINE :properties (:ID "p2" :TITLE "Project 2" :TAGS ("project")) :contents nil))
   (let ((output (context-awareness-assemble)))