git.iko.soy/patch
on develop help sign in
Merge pull request #275 from reflex-frp/aa-notready-export
4ac1b7cRyan Trinkle
src/Reflex.hs+1
compare with develop
unifiedsplit
@@ -19,6 +19,7 @@ import Reflex.Dynamic.TH as X
19import Reflex.Dynamic.Uniq as X
19import Reflex.Dynamic.Uniq as X
20import Reflex.DynamicWriter.Base as X
20import Reflex.DynamicWriter.Base as X
21import Reflex.DynamicWriter.Class as X
21import Reflex.DynamicWriter.Class as X
22+import Reflex.NotReady.Class as X
22import Reflex.PerformEvent.Base as X
23import Reflex.PerformEvent.Base as X
23import Reflex.PerformEvent.Class as X
24import Reflex.PerformEvent.Class as X
24import Reflex.PostBuild.Base as X
25import Reflex.PostBuild.Base as X
src/Reflex/NotReady/Class.hs+8
@@ -39,6 +39,10 @@ instance NotReady t m => NotReady t (ReaderT r m) where
39 notReadyUntil = lift . notReadyUntil
39 notReadyUntil = lift . notReadyUntil
40 notReady = lift notReady
40 notReady = lift notReady
41
41
42+instance (NotReady t m, Monoid w) => NotReady t (WriterT w m) where
43+ notReadyUntil = lift . notReadyUntil
44+ notReady = lift notReady
45+
42instance NotReady t m => NotReady t (PostBuildT t m) where
46instance NotReady t m => NotReady t (PostBuildT t m) where
43 notReadyUntil = lift . notReadyUntil
47 notReadyUntil = lift . notReadyUntil
44 notReady = lift notReady
48 notReady = lift notReady
@@ -51,6 +55,10 @@ instance NotReady t m => NotReady t (DynamicWriterT t w m) where
51 notReadyUntil = lift . notReadyUntil
55 notReadyUntil = lift . notReadyUntil
52 notReady = lift notReady
56 notReady = lift notReady
53
57
58+instance (NotReady t m, Monoid w) => NotReady t (BehaviorWriterT t w m) where
59+ notReadyUntil = lift . notReadyUntil
60+ notReady = lift notReady
61+
54instance NotReady t m => NotReady t (QueryT t q m) where
62instance NotReady t m => NotReady t (QueryT t q m) where
55 notReadyUntil = lift . notReadyUntil
63 notReadyUntil = lift . notReadyUntil
56 notReady = lift notReady
64 notReady = lift notReady