packages feed

units-parser 0.1.1 → 0.1.1.1

raw patch · 2 files changed

+10/−2 lines, 2 files

Files

Text/Parse/Units.hs view
@@ -1,5 +1,5 @@ {-# LANGUAGE LambdaCase, NoMonomorphismRestriction, FlexibleContexts, RankNTypes,-             Safe, DeriveGeneric, DeriveDataTypeable #-}+             Safe, DeriveGeneric, DeriveDataTypeable, CPP #-} {-# OPTIONS_HADDOCK prune #-}  -----------------------------------------------------------------------------@@ -58,6 +58,10 @@ import Data.Maybe import Data.Char +#if __GLASGOW_HASKELL__ < 709+import Data.Typeable ( Typeable )+#endif+ ---------------------------------------------------------------------- -- Basic combinators ----------------------------------------------------------------------@@ -120,6 +124,10 @@                    | Div (UnitExp pre u) (UnitExp pre u)                    | Pow (UnitExp pre u) Integer                    deriving (Eq, Ord, Generic, Data)++#if __GLASGOW_HASKELL__ < 709+deriving instance Typeable UnitExp+#endif  instance (Show pre, Show u) => Show (UnitExp pre u) where   show Unity               = "1"
units-parser.cabal view
@@ -1,5 +1,5 @@ name:           units-parser-version:        0.1.1+version:        0.1.1.1 cabal-version:  >= 1.10 synopsis:       A parser for units of measure category:       Text