X11-xshape 0.1.0 → 0.1.1
raw patch · 2 files changed
+3/−52 lines, 2 filesdep ~basenew-uploaderPVP: major bump suggested
API removals or changes: PVP suggests a major version bump
Dependency ranges changed: base
API changes (from Hackage documentation)
+ Graphics.X11.Xshape: xshapeGetRectangles :: Display -> Window -> CInt -> Ptr CInt -> Ptr CInt -> IO (Ptr Rectangle)
- Graphics.X11.Xshape: xshapeCombineRectangles :: Display -> Window -> CInt -> CInt -> CInt -> Rectangle -> CInt -> CInt -> CInt -> IO ()
+ Graphics.X11.Xshape: xshapeCombineRectangles :: Display -> Window -> CInt -> CInt -> CInt -> Ptr Rectangle -> CInt -> CInt -> CInt -> IO ()
- Graphics.X11.Xshape: xshapeCombineRegion :: Display -> Window -> CInt -> CInt -> CInt -> Region -> CInt -> IO ()
+ Graphics.X11.Xshape: xshapeCombineRegion :: Display -> Window -> CInt -> CInt -> CInt -> Ptr Region -> CInt -> IO ()
Files
- Graphics/X11/Xshape.hsc +1/−49
- X11-xshape.cabal +2/−3
Graphics/X11/Xshape.hsc view
@@ -23,7 +23,7 @@ , xshapeQueryExtents , xshapeSelectInput , xshapeInputSelected- -- , xshapeGetRectangles+ , xshapeGetRectangles , shapeQueryVersion , shapeRectangles , shapeMask@@ -49,7 +49,6 @@ import Foreign import Foreign.C.Types import Graphics.X11.Xlib-import Control.Monad data XShapeEvent = XShapeEvent { xse_type :: CInt@@ -111,12 +110,6 @@ shapeNumberEvents = shapeNotify + 1 -#ifdef HAVE_X11_EXTENSIONS_XSHAPE_H---- We have Xinerama, so the library will actually work-compiledWithXshape :: Bool-compiledWithXshape = True- -- for XFree() (already included from Xdamage.h, but I don't know if I can count on that.) #include <X11/Xlib.h> @@ -180,44 +173,3 @@ b <- peek bptr return (f ret a b) -#else---- No Xshape, but if we fake a non-active Xdamage interface, we can still have--- an active interface-compiledWithXshape :: Bool-compiledWithXshape = False--xshapeQueryExtension :: Display -> IO (Maybe (CInt, CInt))-xshapeQueryExtension _ = return Nothing--xshapeQueryVersion :: Display -> IO (Maybe (CInt, CInt))-xshapeQueryVersion _ = return Nothing--xshapeCombineRegion :: Display -> Window -> CInt -> CInt -> CInt -> Region -> CInt -> IO()-xshapeCombineRegion _ _ _ _ _ _ _ = return ()--xshapeCombineRectangles :: Display -> Window -> CInt -> CInt -> CInt -> Rectangle -> CInt -> CInt -> CInt -> IO()-xshapeCombineRectangles _ _ _ _ _ _ _ _ _ = return ()--xshapeCombineMask :: Display -> Window -> CInt -> CInt -> CInt -> Pixmap -> CInt -> IO ()-xshapeCombineMask _ _ _ _ _ _ _ = return ()--xshapeCombineShape :: Display -> Window -> CInt -> CInt -> CInt -> Window -> CInt -> CInt -> IO ()-xshapeCombineShape _ _ _ _ _ _ _ _ = return ()--xshapeOffsetShape :: Display -> Window -> CInt -> CInt -> CInt -> IO ()-xshapeOffsetShape _ _ _ _ _ = return ()--xshapeQueryExtents :: Display -> Window -> CInt -> CInt -> CUInt -> CUInt -> Bool -> CInt -> CInt -> CUInt -> CUInt -> IO ()-xshapeQueryExtents _ _ _ _ _ _ _ _ _ _ _ = return ()--xshapeSelectInput :: Display -> Window -> CUInt -> IO()-xshapeSelectInput _ _ _ = return ()--xshapeInputSelected :: Display -> Window -> IO(CUInt)-xshapeInputSelected _ _ = return 0---- xshapeGetRectangles :: Display -> Window -> CInt -> Ptr CInt -> Ptr CInt -> IO(Ptr Rectangle)--- xshapeGetRectangles _ _ _ _ _ = return $ Ptr (Rectangle 0 0 0 0)--#endif
X11-xshape.cabal view
@@ -1,5 +1,5 @@ name: X11-xshape-version: 0.1.0+version: 0.1.1 license: BSD3 license-file: LICENSE copyright: Ewan Higgs, 2008, libraries@haskell.org 2008@@ -8,14 +8,13 @@ category: Graphics synopsis: A binding to the Xshape X11 extension library description: A Haskell binding to the Xshape X11 extention graphics library.- . The binding is a direct translation of the C binding; for documentation of these calls, refer to "The Xlib Programming Manual", available online at <http://tronche.com/gui/x/xlib/>. exposed-modules: Graphics.X11.Xshape extensions: ForeignFunctionInterface, CPP-build-depends: base >= 3 && < 10, X11+build-depends: base >= 3 && < 5, X11 build-type: Simple ghc-options: -funbox-strict-fields -Wall -fno-warn-unused-binds ghc-prof-options: -prof -auto-all