feat(v0.2.0): comprehensive foundation hardening and test verification

- Finalized Reflection Loop: Injected deterministic rejection traces back into LLM prompts.
- Hardened Actuators: Added path-traversal guards and enforced Merkle snapshots on AST edits.
- Refactored Lisp Utils: Merged validator/repair into a unified utility skill with whitelist Ast-walking.
- Fixed Build: Resolved all 30+ syntax, scoping, and package visibility errors.
- Verified: Full pass (100%) on all 5 core test suites.

harness/act.org

@@ -169,7 +169,7 @@ Example feedback chain:
          (cmd (ignore-errors (getf payload :action))))
 
     (case cmd
-      ;; Evaluate Lisp code - guarded by lisp-validator skill
+      ;; Evaluate Lisp code - guarded by lisp-utils skill
       (:eval
        (let ((code (getf payload :code)))
          (eval (read-from-string code))))
@@ -392,7 +392,7 @@ Example feedback chain:
 These tests verify the Act pipeline. Run with:
 ~(fiveam:run! 'pipeline-act-suite)~
 
-#+begin_src lisp :tangle (expand-file-name "tests/pipeline-act-tests.lisp" (concat (or (getenv "INSTALL_DIR") ".") "/harness"))
+#+begin_src lisp :tangle (expand-file-name "pipeline-act-tests.lisp" (concat (or (getenv "INSTALL_DIR") ".") "/tests"))
 (defpackage :opencortex-pipeline-act-tests
   (:use :cl :fiveam :opencortex)
   (:export #:pipeline-act-suite))
@@ -417,13 +417,15 @@ These tests verify the Act pipeline. Run with:
   (clrhash opencortex::*skills-registry*)
   (opencortex::defskill :mock-bouncer
     :priority 200
-    :trigger (lambda (ctx) t)
+    :trigger (lambda (ctx) (declare (ignore ctx)) t)
     :deterministic (lambda (action ctx)
-                     (list :type :LOG :payload (:text "BLOCKED BY SYMBOLIC GUARD"))))
+                     (declare (ignore action ctx))
+                     (list :type :LOG :payload (list :text "BLOCKED BY SYMBOLIC GUARD"))))
   (let* ((signal (list :type :EVENT :status nil :depth 0 :approved-action '(:target :shell :payload (:cmd "ls"))))
          (result (opencortex:act-gate signal)))
     (is (eq :acted (getf signal :status)))
     (is (not (null result)))
     (is (eq :LOG (getf result :type)))
-    (is (search "BLOCKED BY SYMBOLIC GUARD" (getf (getf result :payload) :text))))))
+    (let ((msg (getf (getf result :payload) :text)))
+      (is (search "BLOCKED BY SYMBOLIC GUARD" msg)))))
 #+end_src