diff options
| author | Hugo Hörnquist <hugo@lysator.liu.se> | 2019-03-12 19:06:54 +0100 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2019-03-12 19:06:54 +0100 |
| commit | 5bf50b03a3d5a5d8888021b4f3722031958367d3 (patch) | |
| tree | 8ae79d1e8751a7f74d51869df38a93c609579fb5 /terminal/termios.scm | |
| parent | Add some more time utils. (diff) | |
| download | calp-5bf50b03a3d5a5d8888021b4f3722031958367d3.tar.gz calp-5bf50b03a3d5a5d8888021b4f3722031958367d3.tar.xz | |
Add a bunch of terminal control modules.
Diffstat (limited to 'terminal/termios.scm')
| -rw-r--r-- | terminal/termios.scm | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/terminal/termios.scm b/terminal/termios.scm new file mode 100644 index 00000000..b0ae585e --- /dev/null +++ b/terminal/termios.scm @@ -0,0 +1,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") |