amr/passepartout
1
0
Fork 0
Code Issues 15 Pull Requests 1 Actions Packages Projects Releases Wiki Activity

fix(communication): correctly tangle communication-validator.lisp

Browse Source
This commit is contained in:
Amr Gharbeia
2026-04-28 18:57:57 -04:00
parent 517fc20f4b
commit 1ff614214a
1 changed files with 4 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
harness/communication.org
View File

@@ -78,7 +78,9 @@ The ~communication.lisp~ module defines the low-level transport and framing logi
#+end_src #+end_src
** Structural Validation ** Structural Validation
#+begin_src lisp #+begin_src lisp :tangle communication-validator.lisp
(in-package :opencortex)
(defun validate-communication-protocol-schema (msg) (defun validate-communication-protocol-schema (msg)
"Strict structural validation for incoming protocol messages." "Strict structural validation for incoming protocol messages."
(unless (listp msg) (error "Message must be a plist")) (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 #+end_src
* Test Suite * Test Suite
#+begin_src lisp :tangle tests/communication-tests.lisp #+begin_src lisp :tangle communication-tests.lisp
(defpackage :opencortex-communication-tests (defpackage :opencortex-communication-tests
(:use :cl :fiveam :opencortex) (:use :cl :fiveam :opencortex)
(:export #:communication-protocol-suite)) (:export #:communication-protocol-suite))