diff options
Diffstat (limited to 'src/Gtk/State.dcl')
| -rw-r--r-- | src/Gtk/State.dcl | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/Gtk/State.dcl b/src/Gtk/State.dcl index 5c8d039..389ce71 100644 --- a/src/Gtk/State.dcl +++ b/src/Gtk/State.dcl @@ -7,6 +7,7 @@ from Control.Monad import class Monad from Data.Functor import class Functor from Data.Map import :: Map +from Gtk.Shares import :: ShareId from Gtk.Signal import :: SignalHandlerInternal :: GtkState = @@ -14,6 +15,7 @@ from Gtk.Signal import :: SignalHandlerInternal , return :: !Bool , signal_handlers :: !Map Int SignalHandlerInternal , signal_counter :: !Int + , shares :: !Map ShareId Dynamic } :: GtkM a =: GtkM (GtkState -> (a, GtkState)) |