FIX: Correct all tangle paths and regenerate Lisp sources
This commit is contained in:
@@ -52,7 +52,7 @@ Interfaces for secure system calls. State is event-driven via the core kernel bu
|
||||
* Phase D: Build (Implementation)
|
||||
|
||||
** Whitelisting & Execution
|
||||
#+begin_src lisp :tangle ../projects/org-skill-shell-actuator/src/shell-logic.lisp
|
||||
#+begin_src lisp :tangle ../src/shell-logic.lisp
|
||||
(defparameter *allowed-commands* '("ls" "git" "rg" "grep" "date" "echo" "cat" "node" "python3" "sbcl"))
|
||||
|
||||
(defun execute-shell-safely (action context)
|
||||
@@ -101,7 +101,7 @@ Interfaces for secure system calls. State is event-driven via the core kernel bu
|
||||
#+end_src
|
||||
|
||||
** Feedback Perception
|
||||
#+begin_src lisp :tangle ../projects/org-skill-shell-actuator/src/shell-logic.lisp
|
||||
#+begin_src lisp :tangle ../src/shell-logic.lisp
|
||||
(defun trigger-skill-shell-actuator (context)
|
||||
(let ((type (getf context :type))
|
||||
(payload (getf context :payload)))
|
||||
@@ -110,7 +110,7 @@ Interfaces for secure system calls. State is event-driven via the core kernel bu
|
||||
#+end_src
|
||||
|
||||
** Neuro-Cognitive Analysis
|
||||
#+begin_src lisp :tangle ../projects/org-skill-shell-actuator/src/shell-logic.lisp
|
||||
#+begin_src lisp :tangle ../src/shell-logic.lisp
|
||||
(defun neuro-skill-shell-actuator (context)
|
||||
(let* ((p (getf context :payload))
|
||||
(cmd (getf p :cmd))
|
||||
|
||||
Reference in New Issue
Block a user