fix(chaos): resolve package and symbol issues in Tier 2 tests

harness/memory.org

@@ -402,7 +402,7 @@ Utility functions for AST traversal and path resolution.
     ;; We'll use a manual check here since automatic validation is in the Loop
     (let ((obj (lookup-object id)))
       (let ((current-hash (org-object-hash obj))
-            (computed-hash (compute-merkle-hash (org-object-id obj) 
+            (computed-hash (opencortex:compute-merkle-hash (org-object-id obj) 
                                                (org-object-type obj)
                                                (org-object-attributes obj)
                                                (org-object-content obj)

harness/tui-client.org

@@ -44,14 +44,14 @@ A simple MVP console is insufficient for a Lisp Machine. To reach v0.2.0, the TU
 #+begin_src lisp :tangle (expand-file-name "tui-tests.lisp" (concat (or (getenv "INSTALL_DIR") ".") "/tests"))
 (test test-tui-connection-drop
   "Tier 2 Chaos: Verify that handle-return degrades gracefully when the daemon connection is lost."
-  (let ((opencortex.tui::*chat-history* nil)
+  (let ((opencortex.tui::*incoming-msgs* nil)
         (opencortex.tui::*input-buffer* (make-array 5 :element-type 'char :initial-contents "hello" :fill-pointer 5 :adjustable t))
         ;; Create a closed stream to simulate connection drop
         (mock-stream (make-string-output-stream)))
     (close mock-stream)
     (opencortex.tui::handle-return mock-stream)
     ;; Check if the error was enqueued to history instead of crashing
-    (is (member "ERROR: Connection to daemon lost." opencortex.tui::*chat-history* :test #'string=))))
+    (is (member "ERROR: Connection to daemon lost." opencortex.tui::*incoming-msgs* :test #'string=))))
 #+end_src
 
 * Phase C: Implementation (Build)

skills/org-skill-llm-gateway.org

@@ -28,7 +28,7 @@ The *LLM Gateway* skill provides a unified interface for interacting with multip
     (unwind-protect
          (progn
            (setf (uiop:getenv "OLLAMA_HOST") "localhost:1")
-           (let ((result (opencortex::execute-llm-request :prompt "hello" :provider :ollama)))
+           (let ((result (opencortex.skills.org-skill-llm-gateway::execute-llm-request :prompt "hello" :provider :ollama)))
              (is (eq (getf result :status) :error))
              (is (uiop:string-prefix-p "Ollama Failure" (getf result :message)))))
       (setf (uiop:getenv "OLLAMA_HOST") old-host))))