aboutsummaryrefslogtreecommitdiffhomepage
path: root/System/Posix/Terminal.hsc
diff options
context:
space:
mode:
authorGravatar ross <unknown>2003-04-11 23:37:03 +0000
committerGravatar ross <unknown>2003-04-11 23:37:03 +0000
commit53b1019e9de76f4dd338e628ebe7a91ae00f8b14 (patch)
treeee716202722c4a29e736ff971d071a8e8bc1851e /System/Posix/Terminal.hsc
parent3311122634806034e96805dbc6d812aaf9305299 (diff)
[project @ 2003-04-11 23:37:03 by ross]
replace Word with CTcflag
Diffstat (limited to 'System/Posix/Terminal.hsc')
-rw-r--r--System/Posix/Terminal.hsc2
1 files changed, 1 insertions, 1 deletions
diff --git a/System/Posix/Terminal.hsc b/System/Posix/Terminal.hsc
index 90265d6..f811929 100644
--- a/System/Posix/Terminal.hsc
+++ b/System/Posix/Terminal.hsc
@@ -228,7 +228,7 @@ withBits termios bits = unsafePerformIO $ do
(#poke struct termios, c_cflag) p
((cflag .&. complement (#const CSIZE)) .|. mask bits)
where
- mask :: Int -> Word
+ mask :: Int -> CTcflag
mask 5 = (#const CS5)
mask 6 = (#const CS6)
mask 7 = (#const CS7)