build: embed test scripts into org files and purge tests directory

- Embedded run-all-tests.lisp into harness/package.org.
- Deleted the tests/ directory and orphaned Python test scripts, as all other test files are correctly tangled from their parent org files.

tests/lisp-utils-tests.lisp

@@ -1,96 +0,0 @@
-(defpackage :opencortex-lisp-utils-tests
-  (:use :cl :fiveam :opencortex)
-  (:export #:lisp-utils-suite))
-
-(in-package :opencortex-lisp-utils-tests)
-
-(def-suite lisp-utils-suite
-  :description "Tests for the Lisp Utils skill.")
-
-(in-suite lisp-utils-suite)
-
-;; Character utilities
-;; Character utilities
-(test count-char-balanced
-  (is (= (opencortex::count-char #\( "(+ 1 2)") 1))
-  (is (= (opencortex::count-char #\) "(+ 1 2)") 1)))
-
-(test count-char-unbalanced
-  (is (= (opencortex::count-char #\( "(+ 1 2") 1))
-  (is (= (opencortex::count-char #\) "(+ 1 2") 0)))
-
-(test count-char-empty
-  (is (= (opencortex::count-char #\( "") 0)))
-
-;; Deterministic repair
-(test deterministic-repair-balanced
-  (is (string= (opencortex::deterministic-repair "(+ 1 2)") "(+ 1 2)")))
-
-(test deterministic-repair-unbalanced-open
-  (is (string= (opencortex::deterministic-repair "(+ 1 2") "(+ 1 2)")))
-
-(test deterministic-repair-unbalanced-close
-  (is (string= (opencortex::deterministic-repair "(+ 1 2))") "(+ 1 2))")))
-
-(test deterministic-repair-empty
-  (is (string= (opencortex::deterministic-repair "") "")))
-
-;; Structural check
-(test structural-valid
-  (multiple-value-bind (ok reason line col)
-      (opencortex::lisp-utils-check-structural "(+ 1 2)")
-    (is (eq ok t))))
-
-(test structural-unbalanced
-  (multiple-value-bind (ok reason line col)
-      (opencortex::lisp-utils-check-structural "(+ 1 2")
-    (is (not ok))
-    (is (search "Unbalanced" reason))))
-
-(test structural-mismatched
-  (multiple-value-bind (ok reason line col)
-      (opencortex::lisp-utils-check-structural "[)")
-    (is (not ok))
-    (is (search "Mismatched" reason))))
-
-;; Syntactic check
-(test syntactic-valid
-  (multiple-value-bind (ok reason line col)
-      (opencortex::lisp-utils-check-syntactic "(+ 1 2)")
-    (is (eq ok t))))
-
-(test syntactic-invalid
-  (multiple-value-bind (ok reason line col)
-      (opencortex::lisp-utils-check-syntactic "(1+ 2 #\")")
-    (is (not ok))))
-
-;; Semantic check
-(test semantic-whitelist-safe
-  (multiple-value-bind (ok reason line col)
-      (opencortex::lisp-utils-check-semantic "(+ 1 2)")
-    (is (eq ok t))))
-
-(test semantic-blocked-eval
-  (multiple-value-bind (ok reason line col)
-      (opencortex::lisp-utils-check-semantic "(eval '(+ 1 2))")
-    (is (not ok))))
-
-(test semantic-blocked-delete
-  (multiple-value-bind (ok reason line col)
-      (opencortex::lisp-utils-check-semantic "(delete-file \"x.txt\")")
-    (is (not ok))))
-
-;; Unified validation
-(test unified-success
-  (let ((result (opencortex::lisp-utils-validate "(+ 1 2)" :strict t)))
-    (is (eq (getf result :status) :success))))
-
-(test unified-structural-fail
-  (let ((result (opencortex::lisp-utils-validate "(+ 1 2" :strict nil)))
-    (is (eq (getf result :status) :error))
-    (is (eq (getf result :failed) :structural))))
-
-(test unified-semantic-fail
-  (let ((result (opencortex::lisp-utils-validate "(delete-file \"x.txt\")" :strict t)))
-    (is (eq (getf result :status) :error))
-    (is (eq (getf result :failed) :semantic))))