[Xcb-commit] xhsb XCBExt.hs,1.5,1.6

[Jamey Sharp]

Update of /cvs/xcb/xhsb
In directory gabe:/tmp/cvs-serv23748

Modified Files:
	XCBExt.hs 
Log Message:
Add a type signature for request.

Index: XCBExt.hs
===================================================================
RCS file: /cvs/xcb/xhsb/XCBExt.hs,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -d -r1.5 -r1.6
--- XCBExt.hs	10 Jan 2006 23:28:10 -0000	1.5
+++ XCBExt.hs	10 Jan 2006 23:28:53 -0000	1.6
@@ -49,6 +49,7 @@
 
 foreign import ccall "X11/XCB/xcbext.h XCBWaitForReply" _waitForReply :: Ptr XCBConnection -> Word32 -> Ptr (Ptr XCBGenericError) -> IO (Ptr Word32)
 
+request :: IO Word32 -> IO Word32
 request = return . trace' "sent request" =<< throwIf (== 0) (const "couldn't send request")
 
 requestWithReply :: Data reply => Ptr XCBConnection -> IO Word32 -> IO reply