From fa636af6f4a3554c5ba3eb46f07525e73b470172 Mon Sep 17 00:00:00 2001 From: mthomas Date: Thu, 17 Apr 2003 12:58:14 +0000 Subject: [PATCH] [project @ 2003-04-17 12:58:14 by mthomas] Fix "System/Posix/Internals.hs:273: Malformed entity string". --- System/Posix/Internals.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/System/Posix/Internals.hs b/System/Posix/Internals.hs index 7ac142f..47362ed 100644 --- a/System/Posix/Internals.hs +++ b/System/Posix/Internals.hs @@ -267,13 +267,13 @@ getEcho fd = do then ioException (ioe_unk_error "getEcho" "failed to get echoing") else return (r == 1) -foreign import ccall unsafe "HsBase.h consUtils.h set_console_buffering__" +foreign import ccall unsafe "consUtils.h set_console_buffering__" set_console_buffering :: CInt -> CInt -> IO CInt -foreign import ccall unsafe "HsBase.h consUtils.h set_console_echo__" +foreign import ccall unsafe "consUtils.h set_console_echo__" set_console_echo :: CInt -> CInt -> IO CInt -foreign import ccall unsafe "HsBase.h consUtils.h get_console_echo__" +foreign import ccall unsafe "consUtils.h get_console_echo__" get_console_echo :: CInt -> IO CInt #endif -- 1.7.10.4