From c9c0535f41b90ec46abca0b05cd04509569b6852 Mon Sep 17 00:00:00 2001
From: mainzelm <mainzelm>
Date: Fri, 22 Mar 2002 10:22:59 +0000
Subject: [PATCH] Bug fix: 2 values were not converted to descriptors.

---
 scsh/tty1.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/scsh/tty1.c b/scsh/tty1.c
index fe50e56..a67da9b 100644
--- a/scsh/tty1.c
+++ b/scsh/tty1.c
@@ -64,8 +64,8 @@ s48_value scheme_tcgetattr(s48_value sch_fd, s48_value sch_control_chars)
     sch_oflag = s48_enter_integer(t.c_oflag);
     sch_cflag = s48_enter_integer(t.c_cflag);
     sch_lflag = s48_enter_integer(t.c_lflag);
-    sch_ispeed = cfgetispeed(&t);
-    sch_ospeed = cfgetospeed(&t);
+    sch_ispeed = s48_enter_integer(cfgetispeed(&t));
+    sch_ospeed = s48_enter_integer(cfgetospeed(&t));
 
     sch_retval = s48_list_6 (sch_iflag, sch_oflag, sch_cflag, sch_lflag,
 			     sch_ispeed, sch_ospeed);