SDL-gfx 0.6.1.0 → 0.6.2.0
raw patch · 3 files changed
+11/−3 lines, 3 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
+ Graphics.UI.SDL.Primitives: roundedBox :: Surface -> Rect -> Int16 -> Pixel -> IO Bool
Files
- Graphics/UI/SDL/Primitives.hs +8/−1
- SDL-gfx.cabal +2/−2
- contributors.txt +1/−0
Graphics/UI/SDL/Primitives.hs view
@@ -16,6 +16,7 @@ , rectangle , circle , box+ , roundedBox , line , aaLine , arc@@ -74,7 +75,13 @@ box :: Surface -> Rect -> Pixel -> IO Bool box surface (Rect x y w h) (Pixel c) = withForeignPtr surface $ \ptr -> intToBool (-1) (fmap fromCInt $ gfxBoxColor ptr (fromIntegral x) (fromIntegral y) (fromIntegral w) (fromIntegral h) c)- ++foreign import ccall unsafe "roundedBoxColor" gfxRoundedBoxColor :: Ptr SurfaceStruct -> Int16 -> Int16 -> Int16 -> Int16 -> Int16 -> Word32 -> IO CInt++roundedBox :: Surface -> Rect -> Int16 -> Pixel -> IO Bool+roundedBox surface (Rect x y w h) rad (Pixel c) = withForeignPtr surface $ \ptr ->+ intToBool (-1) (fmap fromCInt $ gfxRoundedBoxColor ptr (fromIntegral x) (fromIntegral y) (fromIntegral w) (fromIntegral h) rad c)+ foreign import ccall unsafe "lineColor" gfxLineColor :: Ptr SurfaceStruct -> Int16 -> Int16 -> Int16 -> Int16 -> Word32 -> IO CInt line :: Surface -> Int16 -> Int16 -> Int16 -> Int16 -> Pixel -> IO Bool
SDL-gfx.cabal view
@@ -1,6 +1,6 @@ Cabal-Version: >= 1.6 Name: SDL-gfx-Version: 0.6.1.0+Version: 0.6.2.0 Maintainer: Francesco Ariis <fa-ml@ariis.it> Author: Lemmih (lemmih@gmail.com) Copyright: 2004-2005, 2010, Lemmih@@ -10,7 +10,7 @@ Category: Foreign binding Synopsis: Binding to libSDL_gfx Extra-Source-Files: SDL-gfx.buildinfo.in, config.mk.in, configure, includes/HsSDLConfig.h.in-Data-Files: README, MACOSX+Data-Files: README, MACOSX, contributors.txt custom-setup setup-depends: base >= 3 && < 5,
+ contributors.txt view
@@ -0,0 +1,1 @@+Christina Zeller