+{-# LANGUAGE CPP
+ , NoImplicitPrelude
+ , Rank2Types
+ , ExistentialQuantification
+ #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Desugar
import Control.Arrow (Arrow(..))
import Control.Category ((.))
import Data.Data (Data)
-import Prelude hiding ((.))
-- A version of Control.Category.>>> overloaded on Arrow
#ifndef __HADDOCK__