amr/cl-tty
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

v0.15.0: Critical input/rendering fixes, subagent-reviewed #7

Merged
amr merged 36 commits from feature/v0.11.0-slots into main 2026-05-11 22:03:18 -04:00
Conversation 0 Commits 36 Files Changed 76 +7 -3
2 changed files with 7 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files
Showing only changes of commit 4594d40a9c - Show all commits

5
demo.lisp
View File

@@ -126,7 +126,10 @@
(defun run-demo ()
(let ((saved (ignore-errors (set-raw-mode))))
(unless saved
(format *error-output* "Failed to set raw mode, trying pipe-safe mode~%"))
(format *error-output* "~&ERROR: Cannot set terminal to raw mode.~%")
(format *error-output* " Make sure you are in a real terminal (not a pipe/redirect).~%")
(format *error-output* " Try: sbcl --script demo.lisp~%")
(return-from run-demo))
(unwind-protect
(progn
(init-app-state)

5
src/components/input.lisp
View File

@@ -63,8 +63,9 @@
(clear-flag (sb-posix:termios-lflag termios)
(logior sb-posix:icanon sb-posix:echo
sb-posix:isig sb-posix:iexten)))
(setf (sb-posix:termios-cc termios sb-posix:vmin) 1)
(setf (sb-posix:termios-cc termios sb-posix:vtime) 0)
(let ((cc-array (sb-posix:termios-cc termios)))
(setf (aref cc-array sb-posix:vmin) 1)
(setf (aref cc-array sb-posix:vtime) 0))
termios))
(defun set-raw-mode ()