@@ -157,7 +157,11 @@ data ImmediateDomBuilderEnv t
159newtype ImmediateDomBuilderT t m a = ImmediateDomBuilderT { unImmediateDomBuilderT :: ReaderT (ImmediateDomBuilderEnv t) (RequesterT t JSM Identity (TriggerEventT t m)) a }
159newtype ImmediateDomBuilderT t m a = ImmediateDomBuilderT { unImmediateDomBuilderT :: ReaderT (ImmediateDomBuilderEnv t) (RequesterT t JSM Identity (TriggerEventT t m)) a }
160− deriving (Functor, Applicative, Monad, MonadFix, MonadIO, MonadException, MonadAsyncException)
160+ deriving (Functor, Applicative, Monad, MonadFix, MonadIO, MonadException
161+#if MIN_VERSION_base(4,9,1)
162+ , MonadAsyncException
162#ifndef __GHCJS__
166#ifndef __GHCJS__
163instance MonadJSM m => MonadJSM (ImmediateDomBuilderT t m) where
167instance MonadJSM m => MonadJSM (ImmediateDomBuilderT t m) where