better sort for tree, trace-io added to eval

This commit is contained in:
David Botton 2024-05-06 22:37:41 -04:00
parent f025a45ec6
commit 6f61020904
3 changed files with 20 additions and 7 deletions

View file

@ -123,7 +123,10 @@ provide an interactive console.)"))
(let* ((*query-io* (make-two-way-stream in-stream out-stream))
(*standard-output* console)
(*standard-input* (make-instance 'console-in-stream :clog-obj clog-obj))
(*terminal-io* (make-two-way-stream *standard-input* *standard-output*))
(*debug-io* *terminal-io*)
(*error-output* console)
(*trace-output* console)
(*debugger-hook* (if clog-connection:*disable-clog-debugging*
*debugger-hook*
#'my-debugger))