packages feed

blazeT 0.0.5 → 0.0.6

raw patch · 4 files changed

+47/−6 lines, 4 filessetup-changednew-uploaderPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

API changes (from Hackage documentation)

- Text.BlazeT.Internal: instance (GHC.Base.Monad m, GHC.Base.Monoid a) => GHC.Base.Monoid (Text.BlazeT.Internal.MarkupT m a)
+ Text.BlazeT.Internal: instance (GHC.Base.Monad m, GHC.Base.Semigroup a) => GHC.Base.Semigroup (Text.BlazeT.Internal.MarkupT m a)
- Text.BlazeT: data Attribute :: *
+ Text.BlazeT: data Attribute
- Text.BlazeT: data AttributeValue :: *
+ Text.BlazeT: data AttributeValue
- Text.BlazeT: data Tag :: *
+ Text.BlazeT: data Tag
- Text.BlazeT: preEscapedToValue :: a -> AttributeValue
+ Text.BlazeT: preEscapedToValue :: ToValue a => a -> AttributeValue
- Text.BlazeT: toValue :: a -> AttributeValue
+ Text.BlazeT: toValue :: ToValue a => a -> AttributeValue
- Text.BlazeT.Html: preEscapedToHtml :: (ToMarkup a) => a -> Html
+ Text.BlazeT.Html: preEscapedToHtml :: ToMarkup a => a -> Html
- Text.BlazeT.Html: toHtml :: (ToMarkup a) => a -> Html
+ Text.BlazeT.Html: toHtml :: ToMarkup a => a -> Html
- Text.BlazeT.Internal: Static :: {-# UNPACK #-} ~StaticString -> ChoiceString
+ Text.BlazeT.Internal: Static :: {-# UNPACK #-} !StaticString -> ChoiceString
- Text.BlazeT.Internal: data Attribute :: *
+ Text.BlazeT.Internal: data Attribute
- Text.BlazeT.Internal: data AttributeValue :: *
+ Text.BlazeT.Internal: data AttributeValue
- Text.BlazeT.Internal: data ChoiceString :: *
+ Text.BlazeT.Internal: data ChoiceString
- Text.BlazeT.Internal: data StaticString :: *
+ Text.BlazeT.Internal: data StaticString
- Text.BlazeT.Internal: data Tag :: *
+ Text.BlazeT.Internal: data Tag
- Text.BlazeT.Internal: null :: Foldable t => forall a. t a -> Bool
+ Text.BlazeT.Internal: null :: Foldable t => t a -> Bool

Files

Setup.hs view
@@ -1,3 +1,4 @@+{-# LANGUAGE CPP #-} import Distribution.Simple import Distribution.Simple.Setup import Distribution.Simple.Haddock@@ -8,7 +9,16 @@         haddockHtml         = Flag True,         haddockProgramArgs  = [("-q",["aliased"])], -- does not seam to do anything         haddockExecutables  = Flag True,+#   if defined(MIN_VERSION_Cabal)+#     if MIN_VERSION_Cabal(2, 2, 0)+        haddockLinkedSource = Flag True+#     else         haddockHscolour     = Flag True+#     endif+#   else+        -- Almost certainly Cabal 1.22 or older+        haddockHscolour     = Flag True+#   endif         }     }
blazeT.cabal view
@@ -1,6 +1,5 @@ Name:             blazeT-Version:          0.0.5-Homepage:+Version:          0.0.6 Bug-Reports:      http://github.com/johannesgerer/blazeT/issues License:          MIT License-file:     LICENSE@@ -19,7 +18,7 @@   Build-type:    Custom-Cabal-version: >= 1.8+Cabal-version: >= 1.10  Extra-source-files:   README.md@@ -28,10 +27,10 @@   src/Util/GenerateHtmlTCombinators.hs  Custom-setup-  setup-depends:  base >= 4.0.0.0 && < 5, Cabal+  setup-depends:  base >= 4.0.0.0 && < 5, Cabal < 4  Library-  -- Default-Language: Haskell2010              +  Default-Language: Haskell2010   Hs-source-dirs: src   Ghc-Options:    -Wall                   -fsimpl-tick-factor=200
src/Text/BlazeT/Html.hs view
@@ -1,3 +1,4 @@+{-# LANGUAGE MonoLocalBinds #-} {-# LANGUAGE RankNTypes #-} module Text.BlazeT.Html     (
src/Text/BlazeT/Internal.hs view
@@ -189,11 +189,42 @@ {-# INLINE wrapMarkup2 #-}  +mappendMarkupT+#if defined(MIN_VERSION_base)+#  if MIN_VERSION_base(4, 11, 0)+  :: (Monad m, Semigroup a)+#  else+  :: (Monad m, Monoid a)+#  endif+#else+  -- Almost certainly GHC < 8, which corresponds to `base` w/o Semigroup+  :: (Monad m, Monoid a)+#endif+  => MarkupT m a+  -> MarkupT m a+  -> MarkupT m a+a `mappendMarkupT` b = do {a' <- a; b >>= return . (a' <>)}++#if defined(MIN_VERSION_base)+#  if MIN_VERSION_base(4, 11, 0)+instance (Monad m,Semigroup a) => Semigroup (MarkupT m a) where+  (<>) = mappendMarkupT+  {-# INLINE (<>) #-}+#  else instance (Monad m,Monoid a) => Monoid (MarkupT m a) where   mempty = return mempty   {-# INLINE mempty #-}-  a `mappend` b = do {a' <- a; b >>= return . (mappend a')}+  mappend = mappendMarkupT   {-# INLINE mappend #-}+#  endif+#else+  -- Almost certainly GHC < 8, which corresponds to `base` w/o Semigroup+instance (Monad m,Monoid a) => Monoid (MarkupT m a) where+  mempty = return mempty+  {-# INLINE mempty #-}+  mappend = mappendMarkupT+  {-# INLINE mappend #-}+#endif   instance Monad m => Text.Blaze.Attributable (MarkupT m a) where