Skip to content

Instantly share code, notes, and snippets.

@lspitzner

lspitzner/MainReflex.hs

Created April 19, 2017 13:37
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save lspitzner/205f7d81977fd87c544988a163e72af8 to your computer and use it in GitHub Desktop.
Save lspitzner/205f7d81977fd87c544988a163e72af8 to your computer and use it in GitHub Desktop.
Download ZIP
reflex design
Raw
MainReflex.hs
brickWrapper
:: forall n t
. (Ord n, R.ReflexHost t, MonadIO (R.PushM t), MonadIO (R.HostFrame t))
=> R.Event t ()
-> R.Dynamic t [Widget n]
-> R.Dynamic t ([CursorLocation n] -> Maybe (CursorLocation n))
-> R.Dynamic t AttrMap
-> RH.AppHost
t
( R.Event t (Maybe Event)
, R.Event t ()
, ( forall a . R.Event t (IO a)
-> RH.AppHost t (R.Event t a)
)
)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment