relational-schemas 0.1.2.0 → 0.1.2.1

raw patch · 22 files changed

+24/−45 lines, 22 filesdep ~persistable-recorddep ~relational-queryPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

Dependency ranges changed: persistable-record, relational-query

API changes (from Hackage documentation)

- Database.Relational.Schema.DB2Syscat.Columns: insertQueryColumns :: forall p_aJGR. Relation p_aJGR Columns -> InsertQuery p_aJGR

+ Database.Relational.Schema.DB2Syscat.Columns: insertQueryColumns :: Relation p_asSD Columns -> InsertQuery p_asSD

- Database.Relational.Schema.MySQLInfo.Columns: insertQueryColumns :: forall p_aEDT. Relation p_aEDT Columns -> InsertQuery p_aEDT

+ Database.Relational.Schema.MySQLInfo.Columns: insertQueryColumns :: Relation p_a8QV Columns -> InsertQuery p_a8QV

- Database.Relational.Schema.OracleDataDictionary.TabColumns: insertQueryDbaTabColumns :: forall p_awae. Relation p_awae DbaTabColumns -> InsertQuery p_awae

+ Database.Relational.Schema.OracleDataDictionary.TabColumns: insertQueryDbaTabColumns :: Relation p_ad74 DbaTabColumns -> InsertQuery p_ad74

- Database.Relational.Schema.PgCatalog.PgAttribute: insertQueryPgAttribute :: forall p_ajfq. Relation p_ajfq PgAttribute -> InsertQuery p_ajfq

+ Database.Relational.Schema.PgCatalog.PgAttribute: insertQueryPgAttribute :: Relation p_aoGg PgAttribute -> InsertQuery p_aoGg

- Database.Relational.Schema.PgCatalog.PgType: insertQueryPgType :: forall p_anO0. Relation p_anO0 PgType -> InsertQuery p_anO0

+ Database.Relational.Schema.PgCatalog.PgType: insertQueryPgType :: Relation p_alQx PgType -> InsertQuery p_alQx

- Database.Relational.Schema.SQLServerSyscat.Columns: insertQueryColumns :: forall p_afb3. Relation p_afb3 Columns -> InsertQuery p_afb3

+ Database.Relational.Schema.SQLServerSyscat.Columns: insertQueryColumns :: Relation p_ajZ4 Columns -> InsertQuery p_ajZ4

- Database.Relational.Schema.SQLServerSyscat.Types: insertQueryTypes :: forall p_aevz. Relation p_aevz Types -> InsertQuery p_aevz

+ Database.Relational.Schema.SQLServerSyscat.Types: insertQueryTypes :: Relation p_aiLy Types -> InsertQuery p_aiLy

- Database.Relational.Schema.SQLite3Syscat.IndexInfo: insertQueryIndexInfo :: forall p_a6Zq. Relation p_a6Zq IndexInfo -> InsertQuery p_a6Zq

+ Database.Relational.Schema.SQLite3Syscat.IndexInfo: insertQueryIndexInfo :: Relation p_ahUe IndexInfo -> InsertQuery p_ahUe

- Database.Relational.Schema.SQLite3Syscat.IndexList: insertQueryIndexList :: forall p_a9ya. Relation p_a9ya IndexList -> InsertQuery p_a9ya

+ Database.Relational.Schema.SQLite3Syscat.IndexList: insertQueryIndexList :: Relation p_agY3 IndexList -> InsertQuery p_agY3

- Database.Relational.Schema.SQLite3Syscat.TableInfo: insertQueryTableInfo :: forall p_aadG. Relation p_aadG TableInfo -> InsertQuery p_aadG

+ Database.Relational.Schema.SQLite3Syscat.TableInfo: insertQueryTableInfo :: Relation p_ahkr TableInfo -> InsertQuery p_ahkr

Files

relational-schemas.cabal +3/−3
src/Database/Relational/Schema/DB2Syscat/Columns.hs +1/−2
src/Database/Relational/Schema/DB2Syscat/Keycoluse.hs +1/−2
src/Database/Relational/Schema/DB2Syscat/Tabconst.hs +1/−2
src/Database/Relational/Schema/MySQLInfo/Columns.hs +1/−2
src/Database/Relational/Schema/MySQLInfo/KeyColumnUsage.hs +1/−2
src/Database/Relational/Schema/MySQLInfo/TableConstraints.hs +1/−2
src/Database/Relational/Schema/OracleDataDictionary/ConsColumns.hs +1/−2
src/Database/Relational/Schema/OracleDataDictionary/Constraints.hs +1/−2
src/Database/Relational/Schema/OracleDataDictionary/TabColumns.hs +1/−2
src/Database/Relational/Schema/PgCatalog/PgAttribute.hs +1/−2
src/Database/Relational/Schema/PgCatalog/PgClass.hs +1/−2
src/Database/Relational/Schema/PgCatalog/PgConstraint.hs +1/−2
src/Database/Relational/Schema/PgCatalog/PgNamespace.hs +1/−2
src/Database/Relational/Schema/PgCatalog/PgType.hs +1/−2
src/Database/Relational/Schema/SQLServerSyscat/Columns.hs +1/−2
src/Database/Relational/Schema/SQLServerSyscat/IndexColumns.hs +1/−2
src/Database/Relational/Schema/SQLServerSyscat/Indexes.hs +1/−2
src/Database/Relational/Schema/SQLServerSyscat/Types.hs +1/−2
src/Database/Relational/Schema/SQLite3Syscat/IndexInfo.hs +1/−2
src/Database/Relational/Schema/SQLite3Syscat/IndexList.hs +1/−2
src/Database/Relational/Schema/SQLite3Syscat/TableInfo.hs +1/−2

relational-schemas.cabal view

@@ -1,5 +1,5 @@ name:                relational-schemas-version:             0.1.2.0+version:             0.1.2.1 synopsis:            RDBMSs' schema templates for relational-query description:         This package contains some RDBMSs' schema structure definitions.                      Supported RDBMS schemas are below:@@ -73,8 +73,8 @@                        , time                        , bytestring -                       , persistable-record-                       , relational-query+                       , persistable-record >= 0.2+                       , relational-query >= 0.7    hs-source-dirs:      src   ghc-options:         -Wall

src/Database/Relational/Schema/DB2Syscat/Columns.hs view

@@ -15,7 +15,6 @@  import Data.Int (Int16, Int32, Int64) -import Database.Record.TH (derivingShow) import Database.Relational.Query.TH (defineTableTypesAndRecordDefault)  import Database.Relational.Schema.DB2Syscat.Config (config)@@ -100,4 +99,4 @@     ("remarks", [t|Maybe String|])    ]-  [derivingShow])+  [''Show])

src/Database/Relational/Schema/DB2Syscat/Keycoluse.hs view

@@ -16,7 +16,6 @@ module Database.Relational.Schema.DB2Syscat.Keycoluse where  import Data.Int (Int16)-import Database.Record.TH (derivingShow) import Database.Relational.Query.TH (defineTableTypesAndRecordDefault)  import Database.Relational.Schema.DB2Syscat.Config (config)@@ -28,4 +27,4 @@   [("constname", [t| String |]),    ("colname"  , [t| String |]),    ("colseq"   , [t| Int16 |])]-  [derivingShow])+  [''Show])

src/Database/Relational/Schema/DB2Syscat/Tabconst.hs view

@@ -15,7 +15,6 @@ -- Minimum implementation required to generate table constraints. module Database.Relational.Schema.DB2Syscat.Tabconst where -import Database.Record.TH (derivingShow) import Database.Relational.Query.TH (defineTableTypesAndRecordDefault)  import Database.Relational.Schema.DB2Syscat.Config (config)@@ -30,4 +29,4 @@    --    ("type"     , [t| String |]),    ("enforced" , [t| String |])]-  [derivingShow])+  [''Show])

src/Database/Relational/Schema/MySQLInfo/Columns.hs view

@@ -4,7 +4,6 @@ module Database.Relational.Schema.MySQLInfo.Columns where  import Data.Int                     (Int16)-import Database.Record.TH           (derivingShow) import Database.Relational.Query.TH (defineTableTypesAndRecordDefault)  import Database.Relational.Schema.MySQLInfo.Config (config)@@ -20,4 +19,4 @@     , ("is_nullable",       [t|String|])     , ("data_type",         [t|String|])     ]-    [derivingShow])+    [''Show])

src/Database/Relational/Schema/MySQLInfo/KeyColumnUsage.hs view

@@ -4,7 +4,6 @@ module Database.Relational.Schema.MySQLInfo.KeyColumnUsage where  import Data.Int                     (Int16)-import Database.Record.TH           (derivingShow) import Database.Relational.Query.TH (defineTableTypesAndRecordDefault)  import Database.Relational.Schema.MySQLInfo.Config (config)@@ -18,4 +17,4 @@     , ("column_name"        , [t| String |])     , ("ordinal_position"   , [t| Int16 |])     ]-    [derivingShow])+    [''Show])

src/Database/Relational/Schema/MySQLInfo/TableConstraints.hs view

@@ -3,7 +3,6 @@  module Database.Relational.Schema.MySQLInfo.TableConstraints where -import Database.Record.TH           (derivingShow) import Database.Relational.Query.TH (defineTableTypesAndRecordDefault)  import Database.Relational.Schema.MySQLInfo.Config (config)@@ -16,4 +15,4 @@     , ("constraint_name"    , [t| String |])     , ("constraint_type"    , [t| String |])     ]-    [derivingShow])+    [''Show])

src/Database/Relational/Schema/OracleDataDictionary/ConsColumns.hs view

@@ -5,7 +5,6 @@  import Data.Int (Int32) -import Database.Record.TH (derivingShow) import Database.Relational.Query.TH (defineTableTypesAndRecordDefault)  import Database.Relational.Schema.OracleDataDictionary.Config (config)@@ -25,4 +24,4 @@     , ("column_name", [t|Maybe String|])     -- POSITION                                           NUMBER     , ("position", [t|Maybe Int32|])-    ] [derivingShow])+    ] [''Show])

src/Database/Relational/Schema/OracleDataDictionary/Constraints.hs view

@@ -3,7 +3,6 @@  module Database.Relational.Schema.OracleDataDictionary.Constraints where -import Database.Record.TH (derivingShow) import Database.Relational.Query.TH (defineTableTypesAndRecordDefault)  import Database.Relational.Schema.OracleDataDictionary.Config (config)@@ -37,4 +36,4 @@     -- INDEX_NAME                                         VARCHAR2(30)     -- INVALID                                            VARCHAR2(7)     -- VIEW_RELATED                                       VARCHAR2(14)-    ] [derivingShow])+    ] [''Show])

src/Database/Relational/Schema/OracleDataDictionary/TabColumns.hs view

@@ -7,7 +7,6 @@ -- import Data.ByteString (ByteString) -- import Data.Time.Calendar (Day) -import Database.Record.TH (derivingShow) import Database.Relational.Query.TH (defineTableTypesAndRecordDefault)  import Database.Relational.Schema.OracleDataDictionary.Config (config)@@ -79,4 +78,4 @@     , ("data_upgraded", [t|Maybe String|])     -- HISTOGRAM                                          VARCHAR2(15)     , ("histogram", [t|Maybe String|])-    ] [derivingShow])+    ] [''Show])

src/Database/Relational/Schema/PgCatalog/PgAttribute.hs view

@@ -13,7 +13,6 @@  import Data.Int (Int16, Int32) -import Database.Record.TH (derivingShow) import Database.Relational.Query.TH (defineTableTypesAndRecordDefault)  import Database.Relational.Schema.PgCatalog.Config (config)@@ -67,4 +66,4 @@ --  attoptions    | text[]    |     -- ("attoptions"  , [t|String|])   ]-  [derivingShow])+  [''Show])

src/Database/Relational/Schema/PgCatalog/PgClass.hs view

@@ -13,7 +13,6 @@  import Data.Int (Int32) -import Database.Record.TH (derivingShow) import Database.Relational.Query.TH (defineTableTypesAndRecordDefault)  import Database.Relational.Schema.PgCatalog.Config (config)@@ -51,4 +50,4 @@  -- relacl         | aclitem[] |  -- reloptions     | text[]    |   ]-  [derivingShow])+  [''Show])

src/Database/Relational/Schema/PgCatalog/PgConstraint.hs view

@@ -13,7 +13,6 @@  import Data.Int (Int32) -import Database.Record.TH (derivingShow) import Database.Relational.Query.TH (defineTableTypesAndRecordDefault)  import Database.Relational.Schema.PgCatalog.Config (config)@@ -49,4 +48,4 @@  -- conbin        | pg_node_tree |  -- consrc        | text         |   ]-  [derivingShow])+  [''Show])

src/Database/Relational/Schema/PgCatalog/PgNamespace.hs view

@@ -13,7 +13,6 @@  import Data.Int (Int32) -import Database.Record.TH (derivingShow) import Database.Relational.Query.TH (defineTableTypesAndRecordDefault)  import Database.Relational.Schema.PgCatalog.Config (config)@@ -27,4 +26,4 @@  -- nspowner | oid       | not null  -- nspacl   | aclitem[] |   ]-  [derivingShow])+  [''Show])

src/Database/Relational/Schema/PgCatalog/PgType.hs view

@@ -13,7 +13,6 @@  import Data.Int (Int16, Int32) -import Database.Record.TH (derivingShow) import Database.Relational.Query.TH (defineTableTypesAndRecordDefault)  import Database.Relational.Schema.PgCatalog.Config (config)@@ -86,4 +85,4 @@ --  typdefault     | text         |     ("typdefault", [t|Maybe String|])   ]-  [derivingShow])+  [''Show])

src/Database/Relational/Schema/SQLServerSyscat/Columns.hs view

@@ -4,7 +4,6 @@ module Database.Relational.Schema.SQLServerSyscat.Columns where  import Data.Int (Int32)-import Database.Record.TH (derivingShow) import Database.Relational.Query.TH (defineTableTypesAndRecordDefault)  import Database.Relational.Schema.SQLServerSyscat.Config (config)@@ -66,4 +65,4 @@   -- is_column_set         sys     bit                        1 Yes     --("is_column_set", [t|Maybe Bool|])   ]-  [derivingShow])+  [''Show])

src/Database/Relational/Schema/SQLServerSyscat/IndexColumns.hs view

@@ -4,7 +4,6 @@ module Database.Relational.Schema.SQLServerSyscat.IndexColumns where  import Data.Int (Int32)-import Database.Record.TH (derivingShow) import Database.Relational.Query.TH (defineTableTypesAndRecordDefault)  import Database.Relational.Schema.SQLServerSyscat.Config (config)@@ -30,4 +29,4 @@   -- is_included_column    sys     bit                        1 No     ("is_included_column", [t|Bool|])   ]-  [derivingShow])+  [''Show])

src/Database/Relational/Schema/SQLServerSyscat/Indexes.hs view

@@ -5,7 +5,6 @@  --import Data.ByteString (ByteString) import Data.Int (Int32)-import Database.Record.TH (derivingShow) import Database.Relational.Query.TH (defineTableTypesAndRecordDefault)  import Database.Relational.Schema.SQLServerSyscat.Config (config)@@ -54,4 +53,4 @@ -- filter_definition     sys     nvarchar                 max Yes     --("filter_definition", [t|Maybe ByteString|])   ]-  [derivingShow])+  [''Show])

src/Database/Relational/Schema/SQLServerSyscat/Types.hs view

@@ -4,7 +4,6 @@ module Database.Relational.Schema.SQLServerSyscat.Types where  import Data.Int (Int32)-import Database.Record.TH (derivingShow) import Database.Relational.Query.TH (defineTableTypesAndRecordDefault)  import Database.Relational.Schema.SQLServerSyscat.Config (config)@@ -47,4 +46,4 @@ -- is_table_type         sys     bit                        1 No     --("is_table_type", [t|Bool|])   ]-  [derivingShow])+  [''Show])

src/Database/Relational/Schema/SQLite3Syscat/IndexInfo.hs view

@@ -4,7 +4,6 @@ module Database.Relational.Schema.SQLite3Syscat.IndexInfo where  import Data.Int (Int64)-import Database.Record.TH (derivingShow) import Database.Relational.Query.TH (defineTableTypesAndRecordDefault)  import Database.Relational.Schema.SQLite3Syscat.Config (config)@@ -23,4 +22,4 @@ -- name                  text                No     ("name", [t|String|])   ]-  [derivingShow])+  [''Show])

src/Database/Relational/Schema/SQLite3Syscat/IndexList.hs view

@@ -4,7 +4,6 @@ module Database.Relational.Schema.SQLite3Syscat.IndexList where  import Data.Int (Int64)-import Database.Record.TH (derivingShow) import Database.Relational.Query.TH (defineTableTypesAndRecordDefault)  import Database.Relational.Schema.SQLite3Syscat.Config (config)@@ -23,4 +22,4 @@ -- unique                integer             No     ("unique", [t|Int64|])   ]-  [derivingShow])+  [''Show])

src/Database/Relational/Schema/SQLite3Syscat/TableInfo.hs view

@@ -4,7 +4,6 @@ module Database.Relational.Schema.SQLite3Syscat.TableInfo where  import Data.Int (Int16, Int64)-import Database.Record.TH (derivingShow) import Database.Relational.Query.TH (defineTableTypesAndRecordDefault)  import Database.Relational.Schema.SQLite3Syscat.Config (config)@@ -29,4 +28,4 @@ -- pk                    integer             No     ("pk", [t|Int16|])   ]-  [derivingShow])+  [''Show])