mirrors/clog
1
Fork 0
mirror of https://github.com/rabbibotton/clog.git synced 2025-12-06 02:30:42 -08:00
Code Issues Projects Releases Wiki Activity

full debugger

Browse source
This commit is contained in:
David Botton 2024-04-02 18:27:05 -04:00
parent a3be6d4026
commit a77377c35d
2 changed files with 63 additions and 15 deletions
Download patch file Download diff file Expand all files Collapse all files

2
tools/clog-builder-projects.lisp
View file

@ -58,7 +58,7 @@
(let ((val (text-value (entry-point panel))))
(unless (equal val "")
(let ((result (capture-eval (format nil "(~A)" val) :clog-obj panel
:eval-in-package "clog-user")))
:eval-in-package "clog-user")))
(clog-web-alert (connection-body panel) "Result"
(format nil "~&result: ~A" result)
:color-class "w3-green"