refactor: rename economist to token-accountant in core
This commit is contained in:
@@ -709,8 +709,8 @@ EXAMPLES:
|
|||||||
|
|
||||||
;; --- Sovereign Service Fallbacks ---
|
;; --- Sovereign Service Fallbacks ---
|
||||||
|
|
||||||
(defun economist-route-task (context)
|
(defun token-accountant-route-task (context)
|
||||||
"Generic fallback for routing. Overridden by skill-economist."
|
"Generic fallback for routing. Overridden by skill-token-accountant."
|
||||||
(declare (ignore context))
|
(declare (ignore context))
|
||||||
'(:openrouter :gemini))
|
'(:openrouter :gemini))
|
||||||
|
|
||||||
|
|||||||
@@ -54,8 +54,8 @@
|
|||||||
|
|
||||||
;; --- Sovereign Service Fallbacks ---
|
;; --- Sovereign Service Fallbacks ---
|
||||||
|
|
||||||
(defun economist-route-task (context)
|
(defun token-accountant-route-task (context)
|
||||||
"Generic fallback for routing. Overridden by skill-economist."
|
"Generic fallback for routing. Overridden by skill-token-accountant."
|
||||||
(declare (ignore context))
|
(declare (ignore context))
|
||||||
'(:openrouter :gemini))
|
'(:openrouter :gemini))
|
||||||
|
|
||||||
|
|||||||
@@ -62,8 +62,25 @@
|
|||||||
#:skill-trigger-fn
|
#:skill-trigger-fn
|
||||||
#:skill-neuro-prompt
|
#:skill-neuro-prompt
|
||||||
#:skill-symbolic-fn
|
#:skill-symbolic-fn
|
||||||
|
|
||||||
|
;; --- Tool Registry ---
|
||||||
|
#:def-cognitive-tool
|
||||||
|
#:*cognitive-tools*
|
||||||
|
#:cognitive-tool
|
||||||
|
#:cognitive-tool-name
|
||||||
|
#:cognitive-tool-description
|
||||||
|
#:cognitive-tool-parameters
|
||||||
|
#:cognitive-tool-guard
|
||||||
|
#:cognitive-tool-body
|
||||||
|
|
||||||
|
;; --- Emacs Client Registry ---
|
||||||
|
#:*emacs-clients*
|
||||||
|
#:*clients-lock*
|
||||||
|
#:register-emacs-client
|
||||||
|
#:unregister-emacs-client
|
||||||
|
|
||||||
;; --- Neuro (System 1) ---
|
;; --- Neuro (System 1) ---
|
||||||
|
|
||||||
#:ask-neuro
|
#:ask-neuro
|
||||||
#:register-neuro-backend
|
#:register-neuro-backend
|
||||||
#:register-auth-provider
|
#:register-auth-provider
|
||||||
@@ -74,7 +91,7 @@
|
|||||||
#:find-most-similar
|
#:find-most-similar
|
||||||
#:openrouter-get-available-models
|
#:openrouter-get-available-models
|
||||||
#:*provider-cascade*
|
#:*provider-cascade*
|
||||||
#:economist-route-task
|
#:token-accountant-route-task
|
||||||
|
|
||||||
;; --- Symbolic Logic ---
|
;; --- Symbolic Logic ---
|
||||||
#:list-objects-with-attribute
|
#:list-objects-with-attribute
|
||||||
|
|||||||
Reference in New Issue
Block a user