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 - [email protected]
+
+- 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: [email protected], [email protected],
[email protected], [email protected]
-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 : [email protected]
@@ -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 : [email protected]
@@ -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 : [email protected]
@@ -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 : [email protected]
@@ -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 : [email protected]
@@ -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 : [email protected]
@@ -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 : [email protected]
@@ -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 : [email protected]
@@ -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])
