git.iko.soy/reflex
on develop help sign in
Fixes for ghc 8.10
commitd230632427fc1b7031163567c97f20050610c122 authorHamish Mackenzie <Hamish.K.Mackenzie@gmail.com> dateSun 18 Oct 2020, 21:11 (6 years ago) parente844591
2 files changed+2−2
compare with develop
unifiedsplit
src/Reflex/Profiled.hs+1−1 src/Reflex/Spider/Internal.hs+1−1
src/Reflex/Profiled.hs+1−1
@@ -147,7 +147,7 @@ instance Reflex t => Reflex (ProfiledTimeline t) where
147147 pushCheap f (Event_Profiled e) = coerce $ pushCheap (coerce f) $ profileEvent e
148148 pull = Behavior_Profiled . pull . coerce
149149 fanG (Event_Profiled e) = EventSelectorG $ coerce $ selectG (fanG $ profileEvent e)
150− mergeG :: forall (k :: z -> *) q v. GCompare k
150+ mergeG :: forall z (k :: z -> *) q v. GCompare k
151151 => (forall a. q a -> Event (ProfiledTimeline t) (v a))
152152 -> DMap k q -> Event (ProfiledTimeline t) (DMap k v)
153153 mergeG nt = Event_Profiled #. mergeG (coerce nt)
src/Reflex/Spider/Internal.hs+1−1
@@ -2775,7 +2775,7 @@ instance HasSpiderTimeline x => R.Reflex (SpiderTimeline x) where
27752775 fanG e = R.EventSelectorG $ SpiderEvent . selectG (fanG (unSpiderEvent e))
27762776 {-# INLINABLE mergeG #-}
27772777 mergeG
2778− :: forall (k :: k2 -> *) q (v :: k2 -> *). GCompare k
2778+ :: forall k2 (k :: k2 -> *) q (v :: k2 -> *). GCompare k
27792779 => (forall a. q a -> R.Event (SpiderTimeline x) (v a))
27802780 -> DMap k q
27812781 -> R.Event (SpiderTimeline x) (DMap k v)