From 1ff614214af3cca4eb76141f06128f14bd9bea4d Mon Sep 17 00:00:00 2001 From: Amr Gharbeia Date: Tue, 28 Apr 2026 18:57:57 -0400 Subject: [PATCH] fix(communication): correctly tangle communication-validator.lisp --- harness/communication.org | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/harness/communication.org b/harness/communication.org index cf11b2b..a954778 100644 --- a/harness/communication.org +++ b/harness/communication.org @@ -78,7 +78,9 @@ The ~communication.lisp~ module defines the low-level transport and framing logi #+end_src ** Structural Validation -#+begin_src lisp +#+begin_src lisp :tangle communication-validator.lisp +(in-package :opencortex) + (defun validate-communication-protocol-schema (msg) "Strict structural validation for incoming protocol messages." (unless (listp msg) (error "Message must be a plist")) @@ -89,7 +91,7 @@ The ~communication.lisp~ module defines the low-level transport and framing logi #+end_src * Test Suite -#+begin_src lisp :tangle tests/communication-tests.lisp +#+begin_src lisp :tangle communication-tests.lisp (defpackage :opencortex-communication-tests (:use :cl :fiveam :opencortex) (:export #:communication-protocol-suite))