+{-# 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__
data AnnotationWrapper = forall a. (Data a) => AnnotationWrapper a
toAnnotationWrapper :: (Data a) => a -> AnnotationWrapper
-toAnnotationWrapper what = AnnotationWrapper what
\ No newline at end of file
+toAnnotationWrapper what = AnnotationWrapper what