amr/memex
1
0
Fork 0
Code Issues 12 Pull Requests Actions Packages Projects 1 Releases Wiki Activity

REFAC: Standardize on Cognitive Cycle and update documentation

Browse Source
This commit is contained in:
Amr Gharbeia
2026-04-14 15:59:19 -04:00
parent 34a210228e
commit e29ca5679e
46 changed files with 195 additions and 268 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
system/patches/patch-think-robust.lisp
View File

@@ -1,4 +1,4 @@
(in-package :org-agent)
(in-package :opencortex)
(defun think (context)
(let ((active-skill (find-triggered-skill context)))
@@ -25,7 +25,7 @@
(> (length cleaned-thought) 0))
(kernel-log "PROBABILISTIC ENGINE: SALVAGING plain-text response.~%")
(let* ((no-prefix (cl-ppcre:regex-replace "(?i)^(okay,? |sure,? |i will |i've |i have |here is |got it\\.? |understood\\.? |done\\.? |yes,? )+" cleaned-thought "")))
`(:target :emacs :payload (:action :insert-at-end :buffer "*org-agent-chat*" :text ,no-prefix))))
`(:target :emacs :payload (:action :insert-at-end :buffer "*opencortex-chat*" :text ,no-prefix))))
(t
(kernel-log "PROBABILISTIC ENGINE ERROR: Could not parse response as Lisp plist.~%")
nil)))