@@ -1,24 +0,0 @@
1−{-# LANGUAGE CPP #-}
2−{-# OPTIONS_GHC -fno-warn-orphans #-}
3−module Reflex.Dom.Orphans where
4−
5−#ifndef ghcjs_HOST_OS
6−import Control.Monad.Trans
7−import GHCJS.DOM.Types (MonadJSM (..))
8−import Reflex.DynamicWriter
9−import Reflex.EventWriter
10−import Reflex.PostBuild.Base
11−import Reflex.Requester.Base
12−
13−instance MonadJSM m => MonadJSM (DynamicWriterT t w m) where
14− liftJSM' = lift . liftJSM'
15−
16−instance MonadJSM m => MonadJSM (EventWriterT t w m) where
17− liftJSM' = lift . liftJSM'
18−
19−instance MonadJSM m => MonadJSM (PostBuildT t m) where
20− liftJSM' = lift . liftJSM'
21−
22−instance MonadJSM m => MonadJSM (RequesterT t request response m) where
23− liftJSM' = lift . liftJSM'
24−#endif