@@ -181,12 +181,8 @@ instance Terminal Term where
182 output_handle t = return (term_handle t)
182 output_handle t = return (term_handle t)
184−-- foreign import ccall unsafe "output_buffer.h stdout_output_buffer" c_output_byte_buffer
185−-- :: CInt -> Ptr Word8 -> CSize -> IO ()
186foreign import ccall "gwinsz.h c_get_window_size" c_get_window_size
184foreign import ccall "gwinsz.h c_get_window_size" c_get_window_size
187 :: IO CLong
185 :: IO CLong
188−-- foreign import ccall "fdatasync" c_fdatasync
189−-- :: CInt -> IO CInt
191get_window_size :: IO (Int,Int)
187get_window_size :: IO (Int,Int)
192get_window_size = do
188get_window_size = do