@@ -103,6 +103,7 @@ import qualified Reflex.Host.Class
103103import Reflex.NotReady.Class
104104import Reflex.Patch
105105import qualified Reflex.Patch.DMapWithMove as PatchDMapWithMove
106+import Reflex.PerformEvent.Base (PerformEventT)
106107
107108#ifdef DEBUG_TRACE_EVENTS
108109import qualified Data.ByteString.Char8 as BS8
@@ -2705,3 +2706,11 @@ instance MonadAtomicRef (SpiderHostFrame x) where
27052706instance PrimMonad (SpiderHostFrame x) where
27062707 type PrimState (SpiderHostFrame x) = PrimState IO
27072708 primitive = SpiderHostFrame . EventM . primitive
2709+
2710+instance NotReady (SpiderTimeline x) (SpiderHost x) where
2711+ notReadyUntil _ = return ()
2712+ notReady = return ()
2713+
2714+instance HasSpiderTimeline x => NotReady (SpiderTimeline x) (PerformEventT (SpiderTimeline x) (SpiderHost x)) where
2715+ notReadyUntil _ = return ()
2716+ notReady = return ()