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

fix(test): gateway-llm test references wrong function name
Some checks failed
Deploy (Gitea) / deploy (push) Failing after 2s
Details

Browse Source 
EXECUTE-LLM-REQUEST → GATEWAY-LLM-REQUEST (the actual defined function)
This commit is contained in:
Amr Gharbeia
2026-05-03 11:54:04 -04:00
parent 9151f4eff7
commit 22697baa2d
2 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/gateway-llm.lisp
View File

@@ -31,8 +31,8 @@
(unwind-protect (unwind-protect
(progn (progn
(setf (uiop:getenv "OLLAMA_HOST") "localhost:1") (setf (uiop:getenv "OLLAMA_HOST") "localhost:1")
(let ((fn (or (find-symbol "EXECUTE-LLM-REQUEST" :passepartout.gateway-llm) (let ((fn (or (find-symbol "GATEWAY-LLM-REQUEST" :passepartout.gateway-llm)
(find-symbol "EXECUTE-LLM-REQUEST" :passepartout)))) (find-symbol "GATEWAY-LLM-REQUEST" :passepartout))))
(if fn (if fn
(let ((result (funcall fn :prompt "hello" :provider :ollama))) (let ((result (funcall fn :prompt "hello" :provider :ollama)))
(fiveam:is (eq (getf result :status) :error)) (fiveam:is (eq (getf result :status) :error))

4
org/gateway-llm.org
View File

@@ -49,8 +49,8 @@ The LLM Gateway dispatches inference requests to the registered probabilistic ba
(unwind-protect (unwind-protect
(progn (progn
(setf (uiop:getenv "OLLAMA_HOST") "localhost:1") (setf (uiop:getenv "OLLAMA_HOST") "localhost:1")
(let ((fn (or (find-symbol "EXECUTE-LLM-REQUEST" :passepartout.gateway-llm) (let ((fn (or (find-symbol "GATEWAY-LLM-REQUEST" :passepartout.gateway-llm)
(find-symbol "EXECUTE-LLM-REQUEST" :passepartout)))) (find-symbol "GATEWAY-LLM-REQUEST" :passepartout))))
(if fn (if fn
(let ((result (funcall fn :prompt "hello" :provider :ollama))) (let ((result (funcall fn :prompt "hello" :provider :ollama)))
(fiveam:is (eq (getf result :status) :error)) (fiveam:is (eq (getf result :status) :error))