Hello community, here is the log from the commit of package ghc-xml-types for openSUSE:Factory checked in at 2015-07-14 17:44:37 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/ghc-xml-types (Old) and /work/SRC/openSUSE:Factory/.ghc-xml-types.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "ghc-xml-types" Changes: -------- --- /work/SRC/openSUSE:Factory/ghc-xml-types/ghc-xml-types.changes 2015-05-21 08:38:51.000000000 +0200 +++ /work/SRC/openSUSE:Factory/.ghc-xml-types.new/ghc-xml-types.changes 2015-07-14 17:45:51.000000000 +0200 @@ -1,0 +2,5 @@ +Mon Jul 13 05:50:15 UTC 2015 - [email protected] + +- update to 0.3.6 + +------------------------------------------------------------------- @@ -5 +10 @@ -+ remove typo in devel sectionwq ++ remove typo in devel section Old: ---- xml-types-0.3.4.tar.gz New: ---- xml-types-0.3.6.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ ghc-xml-types.spec ++++++ --- /var/tmp/diff_new_pack.F6RZn4/_old 2015-07-14 17:45:52.000000000 +0200 +++ /var/tmp/diff_new_pack.F6RZn4/_new 2015-07-14 17:45:52.000000000 +0200 @@ -19,8 +19,8 @@ %global pkg_name xml-types # no useful debuginfo for Haskell packages without C sources %global debug_package %{nil} -Name: ghc-%{pkg_name} -Version: 0.3.4 +Name: ghc-xml-types +Version: 0.3.6 Release: 0 Summary: Basic types for representing XML License: MIT ++++++ xml-types-0.3.4.tar.gz -> xml-types-0.3.6.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/xml-types-0.3.4/lib/Data/XML/Types.hs new/xml-types-0.3.6/lib/Data/XML/Types.hs --- old/xml-types-0.3.4/lib/Data/XML/Types.hs 2013-07-20 20:48:58.000000000 +0200 +++ new/xml-types-0.3.6/lib/Data/XML/Types.hs 2015-07-08 07:08:54.000000000 +0200 @@ -1,4 +1,7 @@ +{-# LANGUAGE CPP #-} {-# LANGUAGE DeriveDataTypeable #-} +-- if impl(ghc >= 7.2): +-- extensions: DeriveGeneric, StandaloneDeriving -- | -- Module: Data.XML.Types @@ -78,6 +81,10 @@ import Data.Typeable (Typeable) import Control.DeepSeq (NFData(rnf)) +#if MIN_VERSION_base(4,4,0) +import GHC.Generics (Generic) +#endif + data Document = Document { documentPrologue :: Prologue , documentRoot :: Element @@ -88,6 +95,10 @@ instance NFData Document where rnf (Document a b c) = rnf a `seq` rnf b `seq` rnf c `seq` () +#if MIN_VERSION_base(4,4,0) +deriving instance Generic Document +#endif + data Prologue = Prologue { prologueBefore :: [Miscellaneous] , prologueDoctype :: Maybe Doctype @@ -98,6 +109,10 @@ instance NFData Prologue where rnf (Prologue a b c) = rnf a `seq` rnf b `seq` rnf c `seq` () +#if MIN_VERSION_base(4,4,0) +deriving instance Generic Prologue +#endif + data Instruction = Instruction { instructionTarget :: Text , instructionData :: Text @@ -107,6 +122,10 @@ instance NFData Instruction where rnf (Instruction a b) = rnf a `seq` rnf b `seq` () +#if MIN_VERSION_base(4,4,0) +deriving instance Generic Instruction +#endif + data Miscellaneous = MiscInstruction Instruction | MiscComment Text @@ -116,6 +135,10 @@ rnf (MiscInstruction a) = rnf a `seq` () rnf (MiscComment a) = rnf a `seq` () +#if MIN_VERSION_base(4,4,0) +deriving instance Generic Miscellaneous +#endif + data Node = NodeElement Element | NodeInstruction Instruction @@ -129,6 +152,10 @@ rnf (NodeContent a) = rnf a `seq` () rnf (NodeComment a) = rnf a `seq` () +#if MIN_VERSION_base(4,4,0) +deriving instance Generic Node +#endif + data Element = Element { elementName :: Name , elementAttributes :: [(Name, [Content])] @@ -139,6 +166,10 @@ instance NFData Element where rnf (Element a b c) = rnf a `seq` rnf b `seq` rnf c `seq` () +#if MIN_VERSION_base(4,4,0) +deriving instance Generic Element +#endif + data Content = ContentText Text | ContentEntity Text -- ^ For pass-through parsing @@ -148,6 +179,10 @@ rnf (ContentText a) = rnf a `seq` () rnf (ContentEntity a) = rnf a `seq` () +#if MIN_VERSION_base(4,4,0) +deriving instance Generic Content +#endif + -- | A fully qualified name. -- -- Prefixes are not semantically important; they are included only to @@ -186,6 +221,10 @@ instance NFData Name where rnf (Name a b c) = rnf a `seq` rnf b `seq` rnf c `seq` () +#if MIN_VERSION_base(4,4,0) +deriving instance Generic Name +#endif + -- | Note: due to the incredible complexity of DTDs, this type only supports -- external subsets. I've tried adding internal subset types, but they -- quickly gain more code than the rest of this module put together. @@ -201,6 +240,10 @@ instance NFData Doctype where rnf (Doctype a b) = rnf a `seq` rnf b `seq` () +#if MIN_VERSION_base(4,4,0) +deriving instance Generic Doctype +#endif + data ExternalID = SystemID Text | PublicID Text Text @@ -210,6 +253,10 @@ rnf (SystemID a) = rnf a `seq` () rnf (PublicID a b) = rnf a `seq` rnf b `seq` () +#if MIN_VERSION_base(4,4,0) +deriving instance Generic ExternalID +#endif + -- | Some XML processing tools are incremental, and work in terms of events -- rather than node trees. The 'Event' type allows a document to be fully -- specified as a sequence of events. @@ -245,6 +292,10 @@ rnf (EventCDATA a) = rnf a `seq` () rnf _ = () +#if MIN_VERSION_base(4,4,0) +deriving instance Generic Event +#endif + isElement :: Node -> [Element] isElement (NodeElement e) = [e] isElement _ = [] diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/xml-types-0.3.4/xml-types.cabal new/xml-types-0.3.6/xml-types.cabal --- old/xml-types-0.3.4/xml-types.cabal 2013-07-20 20:48:58.000000000 +0200 +++ new/xml-types-0.3.6/xml-types.cabal 2015-07-08 07:08:54.000000000 +0200 @@ -1,5 +1,5 @@ name: xml-types -version: 0.3.4 +version: 0.3.6 synopsis: Basic types for representing XML license: MIT license-file: license.txt @@ -19,12 +19,17 @@ source-repository this type: git location: https://john-millikin.com/code/haskell-xml-types/ - tag: xml-types_0.3.4 + tag: xml-types_0.3.6 library ghc-options: -Wall hs-source-dirs: lib + if impl(ghc >= 7.2) + extensions: DeriveGeneric, StandaloneDeriving + if impl(ghc >= 7.2) && impl(ghc < 7.6) + build-depends: ghc-prim + build-depends: base >= 3.0 && < 5.0 , deepseq >= 1.1.0.0
