Hello community, here is the log from the commit of package ghc-relational-schemas for openSUSE:Factory checked in at 2017-08-31 20:58:35 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/ghc-relational-schemas (Old) and /work/SRC/openSUSE:Factory/.ghc-relational-schemas.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Package is "ghc-relational-schemas" Thu Aug 31 20:58:35 2017 rev:3 rq:513470 version:0.1.4.0 Changes: -------- --- /work/SRC/openSUSE:Factory/ghc-relational-schemas/ghc-relational-schemas.changes 2017-05-16 14:47:01.679341447 +0200 +++ /work/SRC/openSUSE:Factory/.ghc-relational-schemas.new/ghc-relational-schemas.changes 2017-08-31 20:58:37.117248428 +0200 @@ -1,0 +2,5 @@ +Thu Jul 27 14:07:22 UTC 2017 - psimons@suse.com + +- Update to version 0.1.4.0. + +------------------------------------------------------------------- Old: ---- relational-schemas-0.1.3.1.tar.gz relational-schemas.cabal New: ---- relational-schemas-0.1.4.0.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ ghc-relational-schemas.spec ++++++ --- /var/tmp/diff_new_pack.k1DBDh/_old 2017-08-31 20:58:38.549047256 +0200 +++ /var/tmp/diff_new_pack.k1DBDh/_new 2017-08-31 20:58:38.569044446 +0200 @@ -18,18 +18,16 @@ %global pkg_name relational-schemas Name: ghc-%{pkg_name} -Version: 0.1.3.1 +Version: 0.1.4.0 Release: 0 Summary: RDBMSs' schema templates for relational-query License: BSD-3-Clause Group: Development/Languages/Other Url: https://hackage.haskell.org/package/%{pkg_name} Source0: https://hackage.haskell.org/package/%{pkg_name}-%{version}/%{pkg_name}-%{version}.tar.gz -Source1: https://hackage.haskell.org/package/%{pkg_name}-%{version}/revision/2.cabal#/%{pkg_name}.cabal BuildRequires: ghc-Cabal-devel BuildRequires: ghc-bytestring-devel BuildRequires: ghc-containers-devel -BuildRequires: ghc-persistable-record-devel BuildRequires: ghc-relational-query-devel BuildRequires: ghc-rpm-macros BuildRequires: ghc-template-haskell-devel @@ -55,7 +53,6 @@ %prep %setup -q -n %{pkg_name}-%{version} -cp -p %{SOURCE1} %{pkg_name}.cabal %build %ghc_lib_build @@ -75,5 +72,6 @@ %files devel -f %{name}-devel.files %defattr(-,root,root,-) +%doc ChangeLog.md %changelog ++++++ relational-schemas-0.1.3.1.tar.gz -> relational-schemas-0.1.4.0.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/relational-schemas-0.1.3.1/ChangeLog.md new/relational-schemas-0.1.4.0/ChangeLog.md --- old/relational-schemas-0.1.3.1/ChangeLog.md 1970-01-01 01:00:00.000000000 +0100 +++ new/relational-schemas-0.1.4.0/ChangeLog.md 2017-07-17 13:14:05.000000000 +0200 @@ -0,0 +1,31 @@ +<!-- -*- Markdown -*- --> + +## 0.1.4.0 + +- add tested-with 8.2.1. +- switch 3rd number of version to separate from no-generic version. + +## 0.1.3.3 + +- Use Haskell implementation test instead of flag test in .cabal + +## 0.1.3.2 + +- Apply generic instances to schema queries. +- Drop unused implicit imports. + +## 0.1.3.1 + +- Add tested-with. + +## 0.1.3.0 + +- Update typeMap of SQLite3 schema. + +## 0.1.2.0 + +- Get type info of network address in PostgreSQL schema. + +## 0.1.1.0 + +- Add medium-int to typeMap of MySQL schema. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/relational-schemas-0.1.3.1/relational-schemas.cabal new/relational-schemas-0.1.4.0/relational-schemas.cabal --- old/relational-schemas-0.1.3.1/relational-schemas.cabal 2016-06-19 08:38:55.000000000 +0200 +++ new/relational-schemas-0.1.4.0/relational-schemas.cabal 2017-07-17 13:14:05.000000000 +0200 @@ -1,5 +1,5 @@ name: relational-schemas -version: 0.1.3.1 +version: 0.1.4.0 synopsis: RDBMSs' schema templates for relational-query description: This package contains some RDBMSs' schema structure definitions. Supported RDBMS schemas are below: @@ -14,15 +14,17 @@ license-file: LICENSE author: Kei Hibino, Shohei Murayama, Shohei Yasutake, Sho KURODA maintainer: ex8k.hibino@gmail.com, shohei.murayama@gmail.com, amutake.s@gmail.com, krdlab@gmail.com -copyright: Copyright (c) 2013-2016 Kei Hibino, Shohei Murayama, Shohei Yasutake, Sho KURODA +copyright: Copyright (c) 2013-2017 Kei Hibino, Shohei Murayama, Shohei Yasutake, Sho KURODA category: Database build-type: Simple cabal-version: >=1.10 -tested-with: GHC == 8.0.1 +tested-with: GHC == 8.2.1 + , GHC == 8.0.1, GHC == 8.0.2 , GHC == 7.10.1, GHC == 7.10.2, GHC == 7.10.3 , GHC == 7.8.1, GHC == 7.8.2, GHC == 7.8.3, GHC == 7.8.4 , GHC == 7.6.1, GHC == 7.6.2, GHC == 7.6.3 , GHC == 7.4.1, GHC == 7.4.2 +extra-source-files: ChangeLog.md library exposed-modules: @@ -78,8 +80,10 @@ , time , bytestring - , persistable-record >= 0.2 - , relational-query >= 0.8 + , relational-query >= 0.9 + + if impl(ghc == 7.4.*) + build-depends: ghc-prim == 0.2.* hs-source-dirs: src ghc-options: -Wall diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/DB2Syscat/Columns.hs new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/DB2Syscat/Columns.hs --- old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/DB2Syscat/Columns.hs 2016-06-19 08:38:55.000000000 +0200 +++ new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/DB2Syscat/Columns.hs 2017-07-17 13:14:05.000000000 +0200 @@ -1,9 +1,10 @@ {-# LANGUAGE TemplateHaskell #-} {-# LANGUAGE FlexibleInstances #-} +{-# LANGUAGE DeriveGeneric #-} -- | -- Module : Database.Relational.Schema.DB2Syscat.Columns --- Copyright : 2013 Kei Hibino +-- Copyright : 2013-2017 Kei Hibino -- License : BSD3 -- -- Maintainer : ex8k.hibino@gmail.com @@ -13,8 +14,8 @@ -- Generate template of SYSCAT.columns system catalog table. module Database.Relational.Schema.DB2Syscat.Columns where +import GHC.Generics (Generic) import Data.Int (Int16, Int32, Int64) - import Database.Relational.Query.TH (defineTableTypesAndRecord) import Database.Relational.Schema.DB2Syscat.Config (config) @@ -99,4 +100,4 @@ ("remarks", [t|Maybe String|]) ] - [''Show]) + [''Show, ''Generic]) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/DB2Syscat/Keycoluse.hs new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/DB2Syscat/Keycoluse.hs --- old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/DB2Syscat/Keycoluse.hs 2016-06-19 08:38:55.000000000 +0200 +++ new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/DB2Syscat/Keycoluse.hs 2017-07-17 13:14:05.000000000 +0200 @@ -1,9 +1,10 @@ {-# LANGUAGE TemplateHaskell #-} {-# LANGUAGE FlexibleInstances #-} +{-# LANGUAGE DeriveGeneric #-} -- | -- Module : Database.Relational.Schema.DB2Syscat.Keycoluse --- Copyright : 2013 Kei Hibino +-- Copyright : 2013-2017 Kei Hibino -- License : BSD3 -- -- Maintainer : ex8k.hibino@gmail.com @@ -15,6 +16,7 @@ -- Minimum implementation required to generate table constraints. module Database.Relational.Schema.DB2Syscat.Keycoluse where +import GHC.Generics (Generic) import Data.Int (Int16) import Database.Relational.Query.TH (defineTableTypesAndRecord) @@ -27,4 +29,4 @@ [("constname", [t| String |]), ("colname" , [t| String |]), ("colseq" , [t| Int16 |])] - [''Show]) + [''Show, ''Generic]) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/DB2Syscat/Tabconst.hs new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/DB2Syscat/Tabconst.hs --- old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/DB2Syscat/Tabconst.hs 2016-06-19 08:38:55.000000000 +0200 +++ new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/DB2Syscat/Tabconst.hs 2017-07-17 13:14:05.000000000 +0200 @@ -1,9 +1,10 @@ {-# LANGUAGE TemplateHaskell #-} {-# LANGUAGE FlexibleInstances #-} +{-# LANGUAGE DeriveGeneric #-} -- | -- Module : Database.Relational.Schema.DB2Syscat.Tabconst --- Copyright : 2013 Kei Hibino +-- Copyright : 2013-2017 Kei Hibino -- License : BSD3 -- -- Maintainer : ex8k.hibino@gmail.com @@ -15,6 +16,7 @@ -- Minimum implementation required to generate table constraints. module Database.Relational.Schema.DB2Syscat.Tabconst where +import GHC.Generics (Generic) import Database.Relational.Query.TH (defineTableTypesAndRecord) import Database.Relational.Schema.DB2Syscat.Config (config) @@ -29,4 +31,4 @@ -- ("type" , [t| String |]), ("enforced" , [t| String |])] - [''Show]) + [''Show, ''Generic]) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/MySQLInfo/Columns.hs new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/MySQLInfo/Columns.hs --- old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/MySQLInfo/Columns.hs 2016-06-19 08:38:55.000000000 +0200 +++ new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/MySQLInfo/Columns.hs 2017-07-17 13:14:05.000000000 +0200 @@ -1,8 +1,10 @@ {-# LANGUAGE TemplateHaskell #-} {-# LANGUAGE FlexibleInstances #-} +{-# LANGUAGE DeriveGeneric #-} module Database.Relational.Schema.MySQLInfo.Columns where +import GHC.Generics (Generic) import Data.Int (Int16) import Database.Relational.Query.TH (defineTableTypesAndRecord) @@ -19,4 +21,4 @@ , ("is_nullable", [t|String|]) , ("data_type", [t|String|]) ] - [''Show]) + [''Show, ''Generic]) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/MySQLInfo/KeyColumnUsage.hs new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/MySQLInfo/KeyColumnUsage.hs --- old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/MySQLInfo/KeyColumnUsage.hs 2016-06-19 08:38:55.000000000 +0200 +++ new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/MySQLInfo/KeyColumnUsage.hs 2017-07-17 13:14:05.000000000 +0200 @@ -1,8 +1,10 @@ {-# LANGUAGE TemplateHaskell #-} {-# LANGUAGE FlexibleInstances #-} +{-# LANGUAGE DeriveGeneric #-} module Database.Relational.Schema.MySQLInfo.KeyColumnUsage where +import GHC.Generics (Generic) import Data.Int (Int16) import Database.Relational.Query.TH (defineTableTypesAndRecord) @@ -17,4 +19,4 @@ , ("column_name" , [t| String |]) , ("ordinal_position" , [t| Int16 |]) ] - [''Show]) + [''Show, ''Generic]) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/MySQLInfo/TableConstraints.hs new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/MySQLInfo/TableConstraints.hs --- old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/MySQLInfo/TableConstraints.hs 2016-06-19 08:38:55.000000000 +0200 +++ new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/MySQLInfo/TableConstraints.hs 2017-07-17 13:14:05.000000000 +0200 @@ -1,8 +1,10 @@ {-# LANGUAGE TemplateHaskell #-} {-# LANGUAGE FlexibleInstances #-} +{-# LANGUAGE DeriveGeneric #-} module Database.Relational.Schema.MySQLInfo.TableConstraints where +import GHC.Generics (Generic) import Database.Relational.Query.TH (defineTableTypesAndRecord) import Database.Relational.Schema.MySQLInfo.Config (config) @@ -15,4 +17,4 @@ , ("constraint_name" , [t| String |]) , ("constraint_type" , [t| String |]) ] - [''Show]) + [''Show, ''Generic]) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/OracleDataDictionary/ConsColumns.hs new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/OracleDataDictionary/ConsColumns.hs --- old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/OracleDataDictionary/ConsColumns.hs 2016-06-19 08:38:55.000000000 +0200 +++ new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/OracleDataDictionary/ConsColumns.hs 2017-07-17 13:14:05.000000000 +0200 @@ -1,10 +1,11 @@ {-# LANGUAGE TemplateHaskell #-} {-# LANGUAGE FlexibleInstances #-} +{-# LANGUAGE DeriveGeneric #-} module Database.Relational.Schema.OracleDataDictionary.ConsColumns where +import GHC.Generics (Generic) import Data.Int (Int32) - import Database.Relational.Query.TH (defineTableTypesAndRecord) import Database.Relational.Schema.OracleDataDictionary.Config (config) @@ -24,4 +25,4 @@ , ("column_name", [t|Maybe String|]) -- POSITION NUMBER , ("position", [t|Maybe Int32|]) - ] [''Show]) + ] [''Show, ''Generic]) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/OracleDataDictionary/Constraints.hs new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/OracleDataDictionary/Constraints.hs --- old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/OracleDataDictionary/Constraints.hs 2016-06-19 08:38:55.000000000 +0200 +++ new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/OracleDataDictionary/Constraints.hs 2017-07-17 13:14:05.000000000 +0200 @@ -1,8 +1,10 @@ {-# LANGUAGE TemplateHaskell #-} {-# LANGUAGE FlexibleInstances #-} +{-# LANGUAGE DeriveGeneric #-} module Database.Relational.Schema.OracleDataDictionary.Constraints where +import GHC.Generics (Generic) import Database.Relational.Query.TH (defineTableTypesAndRecord) import Database.Relational.Schema.OracleDataDictionary.Config (config) @@ -36,4 +38,4 @@ -- INDEX_NAME VARCHAR2(30) -- INVALID VARCHAR2(7) -- VIEW_RELATED VARCHAR2(14) - ] [''Show]) + ] [''Show, ''Generic]) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/OracleDataDictionary/TabColumns.hs new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/OracleDataDictionary/TabColumns.hs --- old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/OracleDataDictionary/TabColumns.hs 2016-06-19 08:38:55.000000000 +0200 +++ new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/OracleDataDictionary/TabColumns.hs 2017-07-17 13:14:05.000000000 +0200 @@ -1,12 +1,11 @@ {-# LANGUAGE TemplateHaskell #-} {-# LANGUAGE FlexibleInstances #-} +{-# LANGUAGE DeriveGeneric #-} module Database.Relational.Schema.OracleDataDictionary.TabColumns where +import GHC.Generics (Generic) import Data.Int (Int32) --- import Data.ByteString (ByteString) --- import Data.Time.Calendar (Day) - import Database.Relational.Query.TH (defineTableTypesAndRecord) import Database.Relational.Schema.OracleDataDictionary.Config (config) @@ -78,4 +77,4 @@ , ("data_upgraded", [t|Maybe String|]) -- HISTOGRAM VARCHAR2(15) , ("histogram", [t|Maybe String|]) - ] [''Show]) + ] [''Show, ''Generic]) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/PgCatalog/PgAttribute.hs new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/PgCatalog/PgAttribute.hs --- old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/PgCatalog/PgAttribute.hs 2016-06-19 08:38:55.000000000 +0200 +++ new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/PgCatalog/PgAttribute.hs 2017-07-17 13:14:05.000000000 +0200 @@ -1,9 +1,10 @@ {-# LANGUAGE TemplateHaskell #-} {-# LANGUAGE FlexibleInstances #-} +{-# LANGUAGE DeriveGeneric #-} -- | -- Module : Database.HDBC.Schema.PgCatalog.PgAttribute --- Copyright : 2013 Kei Hibino +-- Copyright : 2013-2017 Kei Hibino -- License : BSD3 -- -- Maintainer : ex8k.hibino@gmail.com @@ -11,8 +12,8 @@ -- Portability : unknown module Database.Relational.Schema.PgCatalog.PgAttribute where +import GHC.Generics (Generic) import Data.Int (Int16, Int32) - import Database.Relational.Query.TH (defineTableTypesAndRecord) import Database.Relational.Schema.PgCatalog.Config (config) @@ -66,4 +67,4 @@ -- attoptions | text[] | -- ("attoptions" , [t|String|]) ] - [''Show]) + [''Show, ''Generic]) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/PgCatalog/PgClass.hs new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/PgCatalog/PgClass.hs --- old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/PgCatalog/PgClass.hs 2016-06-19 08:38:55.000000000 +0200 +++ new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/PgCatalog/PgClass.hs 2017-07-17 13:14:05.000000000 +0200 @@ -1,9 +1,10 @@ {-# LANGUAGE TemplateHaskell #-} {-# LANGUAGE FlexibleInstances #-} +{-# LANGUAGE DeriveGeneric #-} -- | -- Module : Database.Relational.Schema.PgCatalog.PgClass --- Copyright : 2013 Kei Hibino +-- Copyright : 2013-2017 Kei Hibino -- License : BSD3 -- -- Maintainer : ex8k.hibino@gmail.com @@ -11,8 +12,8 @@ -- Portability : unknown module Database.Relational.Schema.PgCatalog.PgClass where +import GHC.Generics (Generic) import Data.Int (Int32) - import Database.Relational.Query.TH (defineTableTypesAndRecord) import Database.Relational.Schema.PgCatalog.Config (config) @@ -50,4 +51,4 @@ -- relacl | aclitem[] | -- reloptions | text[] | ] - [''Show]) + [''Show, ''Generic]) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/PgCatalog/PgConstraint.hs new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/PgCatalog/PgConstraint.hs --- old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/PgCatalog/PgConstraint.hs 2016-06-19 08:38:55.000000000 +0200 +++ new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/PgCatalog/PgConstraint.hs 2017-07-17 13:14:05.000000000 +0200 @@ -1,9 +1,10 @@ {-# LANGUAGE TemplateHaskell #-} {-# LANGUAGE FlexibleInstances #-} +{-# LANGUAGE DeriveGeneric #-} -- | -- Module : Database.Relational.Schema.PgCatalog.PgConstraint --- Copyright : 2013 Kei Hibino +-- Copyright : 2013-2017 Kei Hibino -- License : BSD3 -- -- Maintainer : ex8k.hibino@gmail.com @@ -11,8 +12,8 @@ -- Portability : unknown module Database.Relational.Schema.PgCatalog.PgConstraint where +import GHC.Generics (Generic) import Data.Int (Int32) - import Database.Relational.Query.TH (defineTableTypesAndRecord) import Database.Relational.Schema.PgCatalog.Config (config) @@ -48,4 +49,4 @@ -- conbin | pg_node_tree | -- consrc | text | ] - [''Show]) + [''Show, ''Generic]) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/PgCatalog/PgNamespace.hs new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/PgCatalog/PgNamespace.hs --- old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/PgCatalog/PgNamespace.hs 2016-06-19 08:38:55.000000000 +0200 +++ new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/PgCatalog/PgNamespace.hs 2017-07-17 13:14:05.000000000 +0200 @@ -1,9 +1,10 @@ {-# LANGUAGE TemplateHaskell #-} {-# LANGUAGE FlexibleInstances #-} +{-# LANGUAGE DeriveGeneric #-} -- | -- Module : Database.Relational.Schema.PgCatalog.PgNamespace --- Copyright : 2013 Kei Hibino +-- Copyright : 2013-2017 Kei Hibino -- License : BSD3 -- -- Maintainer : ex8k.hibino@gmail.com @@ -11,8 +12,8 @@ -- Portability : unknown module Database.Relational.Schema.PgCatalog.PgNamespace where +import GHC.Generics (Generic) import Data.Int (Int32) - import Database.Relational.Query.TH (defineTableTypesAndRecord) import Database.Relational.Schema.PgCatalog.Config (config) @@ -26,4 +27,4 @@ -- nspowner | oid | not null -- nspacl | aclitem[] | ] - [''Show]) + [''Show, ''Generic]) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/PgCatalog/PgType.hs new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/PgCatalog/PgType.hs --- old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/PgCatalog/PgType.hs 2016-06-19 08:38:55.000000000 +0200 +++ new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/PgCatalog/PgType.hs 2017-07-17 13:14:05.000000000 +0200 @@ -1,9 +1,10 @@ {-# LANGUAGE TemplateHaskell #-} {-# LANGUAGE FlexibleInstances #-} +{-# LANGUAGE DeriveGeneric #-} -- | -- Module : Database.Relational.Schema.PgCatalog.PgType --- Copyright : 2013 Kei Hibino +-- Copyright : 2013-2017 Kei Hibino -- License : BSD3 -- -- Maintainer : ex8k.hibino@gmail.com @@ -11,8 +12,8 @@ -- Portability : unknown module Database.Relational.Schema.PgCatalog.PgType where +import GHC.Generics (Generic) import Data.Int (Int16, Int32) - import Database.Relational.Query.TH (defineTableTypesAndRecord) import Database.Relational.Schema.PgCatalog.Config (config) @@ -85,4 +86,4 @@ -- typdefault | text | ("typdefault", [t|Maybe String|]) ] - [''Show]) + [''Show, ''Generic]) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/SQLServer.hs new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/SQLServer.hs --- old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/SQLServer.hs 2016-06-19 08:38:55.000000000 +0200 +++ new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/SQLServer.hs 2017-07-17 13:14:05.000000000 +0200 @@ -17,7 +17,6 @@ import Data.Int (Int8, Int16, Int32, Int64) import Data.Map (Map) import Data.Time (LocalTime, Day, TimeOfDay) -import Database.Record.Instances () import Database.Relational.Query (Query, Relation, PlaceHolders, Projection, Flat, (!), (.=.), (><), asc, relationalQuery, just, placeholder', query, relation', unsafeShowSql, diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/SQLServerSyscat/Columns.hs new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/SQLServerSyscat/Columns.hs --- old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/SQLServerSyscat/Columns.hs 2016-06-19 08:38:55.000000000 +0200 +++ new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/SQLServerSyscat/Columns.hs 2017-07-17 13:14:05.000000000 +0200 @@ -1,8 +1,10 @@ {-# LANGUAGE TemplateHaskell #-} {-# LANGUAGE FlexibleInstances #-} +{-# LANGUAGE DeriveGeneric #-} module Database.Relational.Schema.SQLServerSyscat.Columns where +import GHC.Generics (Generic) import Data.Int (Int32) import Database.Relational.Query.TH (defineTableTypesAndRecord) @@ -65,4 +67,4 @@ -- is_column_set sys bit 1 Yes --("is_column_set", [t|Maybe Bool|]) ] - [''Show]) + [''Show, ''Generic]) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/SQLServerSyscat/IndexColumns.hs new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/SQLServerSyscat/IndexColumns.hs --- old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/SQLServerSyscat/IndexColumns.hs 2016-06-19 08:38:55.000000000 +0200 +++ new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/SQLServerSyscat/IndexColumns.hs 2017-07-17 13:14:05.000000000 +0200 @@ -1,8 +1,10 @@ {-# LANGUAGE TemplateHaskell #-} {-# LANGUAGE FlexibleInstances #-} +{-# LANGUAGE DeriveGeneric #-} module Database.Relational.Schema.SQLServerSyscat.IndexColumns where +import GHC.Generics (Generic) import Data.Int (Int32) import Database.Relational.Query.TH (defineTableTypesAndRecord) @@ -29,4 +31,4 @@ -- is_included_column sys bit 1 No ("is_included_column", [t|Bool|]) ] - [''Show]) + [''Show, ''Generic]) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/SQLServerSyscat/Indexes.hs new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/SQLServerSyscat/Indexes.hs --- old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/SQLServerSyscat/Indexes.hs 2016-06-19 08:38:55.000000000 +0200 +++ new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/SQLServerSyscat/Indexes.hs 2017-07-17 13:14:05.000000000 +0200 @@ -1,9 +1,10 @@ {-# LANGUAGE TemplateHaskell #-} {-# LANGUAGE FlexibleInstances #-} +{-# LANGUAGE DeriveGeneric #-} module Database.Relational.Schema.SQLServerSyscat.Indexes where ---import Data.ByteString (ByteString) +import GHC.Generics (Generic) import Data.Int (Int32) import Database.Relational.Query.TH (defineTableTypesAndRecord) @@ -53,4 +54,4 @@ -- filter_definition sys nvarchar max Yes --("filter_definition", [t|Maybe ByteString|]) ] - [''Show]) + [''Show, ''Generic]) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/SQLServerSyscat/Types.hs new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/SQLServerSyscat/Types.hs --- old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/SQLServerSyscat/Types.hs 2016-06-19 08:38:55.000000000 +0200 +++ new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/SQLServerSyscat/Types.hs 2017-07-17 13:14:05.000000000 +0200 @@ -1,8 +1,10 @@ {-# LANGUAGE TemplateHaskell #-} {-# LANGUAGE FlexibleInstances #-} +{-# LANGUAGE DeriveGeneric #-} module Database.Relational.Schema.SQLServerSyscat.Types where +import GHC.Generics (Generic) import Data.Int (Int32) import Database.Relational.Query.TH (defineTableTypesAndRecord) @@ -46,4 +48,4 @@ -- is_table_type sys bit 1 No --("is_table_type", [t|Bool|]) ] - [''Show]) + [''Show, ''Generic]) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/SQLite3.hs new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/SQLite3.hs --- old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/SQLite3.hs 2016-06-19 08:38:55.000000000 +0200 +++ new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/SQLite3.hs 2017-07-17 13:14:05.000000000 +0200 @@ -15,7 +15,6 @@ import Data.Int (Int8, Int16, Int32, Int64) import Data.Map (Map) import Data.Time (Day, LocalTime) -import Database.Record.Instances () import Database.Relational.Query (Query) import Database.Relational.Query.Type (unsafeTypedQuery) import Database.Relational.Schema.SQLite3Syscat.IndexInfo diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/SQLite3Syscat/IndexInfo.hs new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/SQLite3Syscat/IndexInfo.hs --- old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/SQLite3Syscat/IndexInfo.hs 2016-06-19 08:38:55.000000000 +0200 +++ new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/SQLite3Syscat/IndexInfo.hs 2017-07-17 13:14:05.000000000 +0200 @@ -1,8 +1,10 @@ {-# LANGUAGE TemplateHaskell #-} {-# LANGUAGE FlexibleInstances #-} +{-# LANGUAGE DeriveGeneric #-} module Database.Relational.Schema.SQLite3Syscat.IndexInfo where +import GHC.Generics (Generic) import Data.Int (Int64) import Database.Relational.Query.TH (defineTableTypesAndRecord) @@ -22,4 +24,4 @@ -- name text No ("name", [t|String|]) ] - [''Show]) + [''Show, ''Generic]) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/SQLite3Syscat/IndexList.hs new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/SQLite3Syscat/IndexList.hs --- old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/SQLite3Syscat/IndexList.hs 2016-06-19 08:38:55.000000000 +0200 +++ new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/SQLite3Syscat/IndexList.hs 2017-07-17 13:14:05.000000000 +0200 @@ -1,8 +1,10 @@ {-# LANGUAGE TemplateHaskell #-} {-# LANGUAGE FlexibleInstances #-} +{-# LANGUAGE DeriveGeneric #-} module Database.Relational.Schema.SQLite3Syscat.IndexList where +import GHC.Generics (Generic) import Data.Int (Int64) import Database.Relational.Query.TH (defineTableTypesAndRecord) @@ -22,4 +24,4 @@ -- unique integer No ("unique", [t|Int64|]) ] - [''Show]) + [''Show, ''Generic]) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/SQLite3Syscat/TableInfo.hs new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/SQLite3Syscat/TableInfo.hs --- old/relational-schemas-0.1.3.1/src/Database/Relational/Schema/SQLite3Syscat/TableInfo.hs 2016-06-19 08:38:55.000000000 +0200 +++ new/relational-schemas-0.1.4.0/src/Database/Relational/Schema/SQLite3Syscat/TableInfo.hs 2017-07-17 13:14:05.000000000 +0200 @@ -1,8 +1,10 @@ {-# LANGUAGE TemplateHaskell #-} {-# LANGUAGE FlexibleInstances #-} +{-# LANGUAGE DeriveGeneric #-} module Database.Relational.Schema.SQLite3Syscat.TableInfo where +import GHC.Generics (Generic) import Data.Int (Int16, Int64) import Database.Relational.Query.TH (defineTableTypesAndRecord) @@ -28,4 +30,4 @@ -- pk integer No ("pk", [t|Int16|]) ] - [''Show]) + [''Show, ''Generic])