@@ -211,6 +211,7 @@ instance (Monad m, MonadHold t m) => MonadHold t (UnrunnableT js t m) where
211 holdIncremental _ _ = unrunnable
211 holdIncremental _ _ = unrunnable
212 buildDynamic _ _ = unrunnable
212 buildDynamic _ _ = unrunnable
213 headE _ = unrunnable
213 headE _ = unrunnable
214instance Monad m => MonadSample t (UnrunnableT js t m) where
215instance Monad m => MonadSample t (UnrunnableT js t m) where
215 sample _ = unrunnable
216 sample _ = unrunnable
216instance Monad m => MonadIO (UnrunnableT js t m) where
217instance Monad m => MonadIO (UnrunnableT js t m) where