misc-deps
/
raart
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

notes

This commit is contained in:
Jay McCarthy 2018-01-02 22:45:37 -05:00
parent c3657e911f
commit 32ebbe4b4b
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
buffer.rkt
View File

@ -57,6 +57,7 @@
(set! last-X X))) (set! last-X X)))
(display (A:dec-soft-terminal-reset) op) (display (A:dec-soft-terminal-reset) op)
;; XXX need to force this sometimes... maybe on resize?
(when (terminal-buffer-clear? buf) (when (terminal-buffer-clear? buf)
(display (A:clear-screen/home) op)) (display (A:clear-screen/home) op))
(display (A:hide-cursor) op) (display (A:hide-cursor) op)
@ -176,7 +177,10 @@
(define (make-buffered-terminal-buffer term-rows term-cols (define (make-buffered-terminal-buffer term-rows term-cols
#:output [op (current-output-port)]) #:output [op (current-output-port)])
;; XXX ;; XXX mix output and terminal, but with two sets of cells (old & new)
;; - On resize, change the cells and underlying terminal
;; - On start, check if draw size is okay, then draw to the cells
;; - On commit, do a diff of the cells and update appropriate cells
(make-terminal-buffer term-rows term-cols (make-terminal-buffer term-rows term-cols
#:clear? #t #:clear? #t
#:output op)) #:output op))