blob: b0ae585ef2b18972ca8272cf6483f6e495fd66ba (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
;;; Module for termios interaction from Guile,
;;; Since that for some reason isn't built in.
(define-module (terminal termios)
#:export (c-lflags-disable! c-lflag-restore!))
(define-public ECHO #x0000010)
(define-public ICANON #x0000002)
(setenv "LD_LIBRARY_PATH" (dirname (dirname (current-filename))))
(load-extension "libtermios" "init_termios")
|
