{-# OPTIONS_HADDOCK ignore-exports, show-extensions #-} {-# LANGUAGE CPP #-} {-# LANGUAGE Safe #-} -- For 'Member' and 'MemberU' aliases below {-# LANGUAGE ConstraintKinds, PolyKinds #-} module Data.OpenUnion.Imports( Applicative(..) , module Impl , Member , MemberU ) where #if __GLASGOW_HASKELL__ < 710 import Control.Applicative(Applicative(..)) #endif #if __GLASGOW_HASKELL__ >= 708 import Data.OpenUnion.Internal.OpenUnion2 as Impl type Member = MemberImpl OU2 type MemberU = MemberUImpl OU2 #else import Data.OpenUnion.Internal.OpenUnion1 as Impl type Member = MemberImpl OU1 type MemberU = MemberUImpl OU1 #endif