blob: e9d4e118159a9e5fea3810c672df28b3f63843e9 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
(define-library (world ui)
(import (scheme base)
(scheme file)
(srfi 1)
(srfi 151)
(world tty-commands)
(par piece-table)) ;; Remove the piece table from here later, and move to main
(cond-expand
(chibi (import (chibi stty)))
(guile (import (world guile-tty)))) ; we fail now, but in the future i can build
; a simple wrapper around termios
(export run)
(include "ui.scm"))
|
