From be68140db19ca1d9e2023d3e3e8eb18d4154950d Mon Sep 17 00:00:00 2001 From: Raymond Toy <toy.raymond@gmail.com> Date: Mon, 11 May 2015 19:34:06 -0700 Subject: [PATCH] Add terminal-speeds to unix-glibc2.lisp. --- src/code/unix-glibc2.lisp | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/src/code/unix-glibc2.lisp b/src/code/unix-glibc2.lisp index 3170aaec2..c35ff936f 100644 --- a/src/code/unix-glibc2.lisp +++ b/src/code/unix-glibc2.lisp @@ -1811,6 +1811,10 @@ ;;; termios.h +(defconstant terminal-speeds + '#(0 50 75 110 134 150 200 300 600 1200 1800 2400 + 4800 9600 19200 38400 57600 115200 230400)) + (defun unix-cfgetospeed (termios) _N"Get terminal output speed." (multiple-value-bind (speed errno) -- GitLab