fltkhs 0.5.3.1 → 0.5.3.2
raw patch · 2 files changed
+9/−10 lines, 2 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
fltkhs.cabal view
@@ -1,5 +1,5 @@ name : fltkhs-version : 0.5.3.1+version : 0.5.3.2 synopsis : FLTK bindings description: Low level bindings for the FLTK GUI toolkit. For installation and quick start instruction please scroll all the way down to the README. license : MIT
src/Graphics/UI/FLTK/LowLevel/Widget.chs view
@@ -416,7 +416,7 @@ instance (impl ~ ( [Damage] -> IO ())) => Op (SetDamage ()) Widget orig impl where runOp _ _ widget damages = withRef widget $ \widgetPtr -> damageWithText' widgetPtr (fromIntegral (combine damages)) {# fun Fl_Widget_damage_inside_widget as damageInsideWidget' { id `Ptr ()',`Word8',`Int',`Int',`Int',`Int' } -> `()' supressWarningAboutRes #}-instance (impl ~ ( [Damage] -> Rectangle -> IO ())) => Op (SetDamageInside()) Widget orig impl where+instance (impl ~ ( [Damage] -> Rectangle -> IO ())) => Op (SetDamageInside ()) Widget orig impl where runOp _ _ widget damages rectangle = withRef widget $ \widgetPtr -> do let (x_pos,y_pos,w_pos,h_pos) = fromRectangle rectangle damageInsideWidget' widgetPtr (fromIntegral (combine damages)) x_pos y_pos w_pos h_pos@@ -481,7 +481,6 @@ -- $widgetfunctions -- @--- -- activate :: 'Ref' 'Widget' -> 'IO' () -- -- active :: 'Ref' 'Widget' -> 'IO' ('Bool')@@ -496,7 +495,7 @@ -- -- clearDamage :: 'Ref' 'Widget' -> 'IO' () ----- clearDamageWithBitmask :: 'Ref' 'Widget' -> 'Word8' -> 'IO' ()+-- clearDamageExcept :: 'Ref' 'Widget' -> ['Damage'] -> 'IO' () -- -- clearOutput :: 'Ref' 'Widget' -> 'IO' () --@@ -532,11 +531,7 @@ -- -- getColor :: 'Ref' 'Widget' -> 'IO' ('Color') ----- getDamage :: 'Ref' 'Widget' -> 'IO' ('Word8')------ getDamageInsideWidget :: 'Ref' 'Widget' -> 'Word8' -> 'Rectangle' -> 'IO' ()------ getDamageWithText :: 'Ref' 'Widget' -> 'Word8' -> 'IO' ()+-- getDamage :: 'Ref' 'Widget' -> 'IO' (['Damage')] -- -- getDeimage :: 'Ref' 'Widget' -> 'IO' ('Ref' 'Image') --@@ -586,7 +581,7 @@ -- -- getY :: 'Ref' 'Widget' -> 'IO' ('Int') ----- handle :: 'Ref' 'Widget' -> ('Event' -> 'IO' ('Either' 'UnknownEvent' ()))+-- handle :: 'Ref' 'Widget' -> 'Event' -> 'IO' ('Either' 'UnknownEvent' ()) -- -- hasCallback :: 'Ref' 'Widget' -> 'IO' ('Bool') --@@ -621,6 +616,10 @@ -- setColor :: 'Ref' 'Widget' -> 'Color' -> 'IO' () -- -- setColorWithBgSel :: 'Ref' 'Widget' -> 'Color' -> 'Color' -> 'IO' ()+--+-- setDamage :: 'Ref' 'Widget' -> ['Damage'] -> 'IO' ()+--+-- setDamageInside :: 'Ref' 'Widget' -> ['Damage'] -> 'Rectangle' -> 'IO' () -- -- setDeimage:: ('Parent' a 'Image') => 'Ref' 'Widget' -> 'Maybe'( 'Ref' a ) -> 'IO' () --