packages feed

relational-schemas 0.1.7.0 → 0.1.8.0

raw patch · 9 files changed

+44/−17 lines, 9 filesdep +sql-wordsPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

Dependencies added: sql-words

API changes (from Hackage documentation)

- Database.Custom.IBMDB2: relationalQuery :: Relation p r -> QuerySuffix -> Query p r
+ Database.Custom.IBMDB2: relationalQuery :: Relation p r -> [Keyword] -> Query p r
- Database.Custom.MySQL: relationalQuery :: Relation p r -> QuerySuffix -> Query p r
+ Database.Custom.MySQL: relationalQuery :: Relation p r -> [Keyword] -> Query p r
- Database.Custom.Oracle: relationalQuery :: Relation p r -> QuerySuffix -> Query p r
+ Database.Custom.Oracle: relationalQuery :: Relation p r -> [Keyword] -> Query p r
- Database.Custom.PostgreSQL: relationalQuery :: Relation p r -> QuerySuffix -> Query p r
+ Database.Custom.PostgreSQL: relationalQuery :: Relation p r -> [Keyword] -> Query p r
- Database.Custom.SQLServer: relationalQuery :: Relation p r -> QuerySuffix -> Query p r
+ Database.Custom.SQLServer: relationalQuery :: Relation p r -> [Keyword] -> Query p r
- Database.Custom.SQLite3: relationalQuery :: Relation p r -> QuerySuffix -> Query p r
+ Database.Custom.SQLite3: relationalQuery :: Relation p r -> [Keyword] -> Query p r
- Database.Relational.Schema.IBMDB2.Columns: insertQueryColumns :: forall p_a8Tn. Relation p_a8Tn Columns -> InsertQuery p_a8Tn
+ Database.Relational.Schema.IBMDB2.Columns: insertQueryColumns :: forall p_a8Tq. Relation p_a8Tq Columns -> InsertQuery p_a8Tq
- Database.Relational.Schema.MySQL.Columns: insertQueryColumns :: forall p_asp6. Relation p_asp6 Columns -> InsertQuery p_asp6
+ Database.Relational.Schema.MySQL.Columns: insertQueryColumns :: forall p_aspf. Relation p_aspf Columns -> InsertQuery p_aspf
- Database.Relational.Schema.Oracle.TabColumns: insertQueryDbaTabColumns :: forall p_aBQh. Relation p_aBQh DbaTabColumns -> InsertQuery p_aBQh
+ Database.Relational.Schema.Oracle.TabColumns: insertQueryDbaTabColumns :: forall p_aBQq. Relation p_aBQq DbaTabColumns -> InsertQuery p_aBQq
- Database.Relational.Schema.PostgreSQL.PgAttribute: insertQueryPgAttribute :: forall p_aL1o. Relation p_aL1o PgAttribute -> InsertQuery p_aL1o
+ Database.Relational.Schema.PostgreSQL.PgAttribute: insertQueryPgAttribute :: forall p_aL1x. Relation p_aL1x PgAttribute -> InsertQuery p_aL1x
- Database.Relational.Schema.PostgreSQL.PgType: insertQueryPgType :: forall p_aRAR. Relation p_aRAR PgType -> InsertQuery p_aRAR
+ Database.Relational.Schema.PostgreSQL.PgType: insertQueryPgType :: forall p_aRB0. Relation p_aRB0 PgType -> InsertQuery p_aRB0
- Database.Relational.Schema.SQLServer.Columns: insertQueryColumns :: forall p_aZQG. Relation p_aZQG Columns -> InsertQuery p_aZQG
+ Database.Relational.Schema.SQLServer.Columns: insertQueryColumns :: forall p_aZUu. Relation p_aZUu Columns -> InsertQuery p_aZUu
- Database.Relational.Schema.SQLServer.Types: insertQueryTypes :: forall p_a13CG. Relation p_a13CG Types -> InsertQuery p_a13CG
+ Database.Relational.Schema.SQLServer.Types: insertQueryTypes :: forall p_a13Gu. Relation p_a13Gu Types -> InsertQuery p_a13Gu
- Database.Relational.Schema.SQLite3.IndexInfo: insertQueryIndexInfo :: forall p_a16ZQ. Relation p_a16ZQ IndexInfo -> InsertQuery p_a16ZQ
+ Database.Relational.Schema.SQLite3.IndexInfo: insertQueryIndexInfo :: forall p_a173E. Relation p_a173E IndexInfo -> InsertQuery p_a173E
- Database.Relational.Schema.SQLite3.IndexList: insertQueryIndexList :: forall p_a17VJ. Relation p_a17VJ IndexList -> InsertQuery p_a17VJ
+ Database.Relational.Schema.SQLite3.IndexList: insertQueryIndexList :: forall p_a17Zx. Relation p_a17Zx IndexList -> InsertQuery p_a17Zx
- Database.Relational.Schema.SQLite3.TableInfo: insertQueryTableInfo :: forall p_a18S6. Relation p_a18S6 TableInfo -> InsertQuery p_a18S6
+ Database.Relational.Schema.SQLite3.TableInfo: insertQueryTableInfo :: forall p_a18VU. Relation p_a18VU TableInfo -> InsertQuery p_a18VU

Files

ChangeLog.md view
@@ -1,5 +1,10 @@ <!-- -*- Markdown -*- --> +## 0.1.8.0++- update for GHC 8.8.x.+- allow more type-categories of PostgreSQL.+ ## 0.1.7.0  - adjust sub-directory modules of each DBMS to top module name.
relational-schemas.cabal view
@@ -1,5 +1,5 @@ name:                relational-schemas-version:             0.1.7.0+version:             0.1.8.0 synopsis:            RDBMSs' schema templates for relational-query description:         This package contains some RDBMSs' schema structure definitions.                      .@@ -20,7 +20,8 @@ category:            Database build-type:          Simple cabal-version:       >=1.10-tested-with:           GHC == 8.6.1, GHC == 8.6.2, GHC == 8.6.3, GHC == 8.6.4, GHC == 8.6.5+tested-with:           GHC == 8.8.1, GHC == 8.8.2+                     , GHC == 8.6.1, GHC == 8.6.2, GHC == 8.6.3, GHC == 8.6.4, GHC == 8.6.5                      , GHC == 8.4.1, GHC == 8.4.2, GHC == 8.4.3, GHC == 8.4.4                      , GHC == 8.2.1, GHC == 8.2.2                      , GHC == 8.0.1, GHC == 8.0.2@@ -108,6 +109,7 @@                        , time                        , bytestring +                       , sql-words                        , relational-query >= 0.12.2    if impl(ghc == 7.4.*)@@ -116,7 +118,9 @@   hs-source-dirs:      src   ghc-options:         -Wall   if impl(ghc >= 8)-    ghc-options:         -Wcompat -Wnoncanonical-monadfail-instances+    ghc-options:         -Wcompat+  if impl(ghc >= 8) && impl(ghc < 8.8)+    ghc-options:         -Wnoncanonical-monadfail-instances    default-language:    Haskell2010
src/Database/Custom/IBMDB2.hs view
@@ -19,6 +19,7 @@   delete, deleteNoPH,   ) where +import Language.SQL.Keyword (Keyword) import Database.Relational.Schema.IBMDB2.Config (config) import Database.Relational hiding   (relationalQuery,@@ -27,7 +28,9 @@    delete, deleteNoPH, )  -- | From 'Relation' into typed 'Query' with suffix SQL words.-relationalQuery :: Relation p r -> QuerySuffix -> Query p r+relationalQuery :: Relation p r  -- ^ relation to finalize building+                -> [Keyword]     -- ^ suffix SQL words. for example, `[FOR, UPDATE]`, `[FETCH, FIRST, "3", ROWS, ONLY]` ...+                -> Query p r     -- ^ finalized query relationalQuery = relationalQuery_ config  -- | Make 'Insert' from derived table and monadic builded 'Register' object.
src/Database/Custom/MySQL.hs view
@@ -19,6 +19,7 @@   delete, deleteNoPH,   ) where +import Language.SQL.Keyword (Keyword) import Database.Relational.Schema.MySQL.Config (config) import Database.Relational hiding   (relationalQuery,@@ -27,7 +28,9 @@    delete, deleteNoPH, )  -- | From 'Relation' into typed 'Query' with suffix SQL words.-relationalQuery :: Relation p r -> QuerySuffix -> Query p r+relationalQuery :: Relation p r  -- ^ relation to finalize building+                -> [Keyword]     -- ^ suffix SQL words. for example, `[FOR, UPDATE]`, `[FETCH, FIRST, "3", ROWS, ONLY]` ...+                -> Query p r     -- ^ finalized query relationalQuery = relationalQuery_ config  -- | Make 'Insert' from derived table and monadic builded 'Register' object.
src/Database/Custom/Oracle.hs view
@@ -19,6 +19,7 @@   delete, deleteNoPH,   ) where +import Language.SQL.Keyword (Keyword) import Database.Relational.Schema.Oracle.Config (config) import Database.Relational hiding   (relationalQuery,@@ -27,7 +28,9 @@    delete, deleteNoPH, )  -- | From 'Relation' into typed 'Query' with suffix SQL words.-relationalQuery :: Relation p r -> QuerySuffix -> Query p r+relationalQuery :: Relation p r  -- ^ relation to finalize building+                -> [Keyword]     -- ^ suffix SQL words. for example, `[FOR, UPDATE]`, `[FETCH, FIRST, "3", ROWS, ONLY]` ...+                -> Query p r     -- ^ finalized query relationalQuery = relationalQuery_ config  -- | Make 'Insert' from derived table and monadic builded 'Register' object.
src/Database/Custom/PostgreSQL.hs view
@@ -19,6 +19,7 @@   delete, deleteNoPH,   ) where +import Language.SQL.Keyword (Keyword) import Database.Relational.Schema.PostgreSQL.Config (config) import Database.Relational hiding   (relationalQuery,@@ -27,7 +28,9 @@    delete, deleteNoPH, )  -- | From 'Relation' into typed 'Query' with suffix SQL words.-relationalQuery :: Relation p r -> QuerySuffix -> Query p r+relationalQuery :: Relation p r  -- ^ relation to finalize building+                -> [Keyword]     -- ^ suffix SQL words. for example, `[FOR, UPDATE]`, `[FETCH, FIRST, "3", ROWS, ONLY]` ...+                -> Query p r     -- ^ finalized query relationalQuery = relationalQuery_ config  -- | Make 'Insert' from derived table and monadic builded 'Register' object.
src/Database/Custom/SQLServer.hs view
@@ -19,6 +19,7 @@   delete, deleteNoPH,   ) where +import Language.SQL.Keyword (Keyword) import Database.Relational.Schema.SQLServer.Config (config) import Database.Relational hiding   (relationalQuery,@@ -27,7 +28,9 @@    delete, deleteNoPH, )  -- | From 'Relation' into typed 'Query' with suffix SQL words.-relationalQuery :: Relation p r -> QuerySuffix -> Query p r+relationalQuery :: Relation p r  -- ^ relation to finalize building+                -> [Keyword]     -- ^ suffix SQL words. for example, `[FOR, UPDATE]`, `[FETCH, FIRST, "3", ROWS, ONLY]` ...+                -> Query p r     -- ^ finalized query relationalQuery = relationalQuery_ config  -- | Make 'Insert' from derived table and monadic builded 'Register' object.
src/Database/Custom/SQLite3.hs view
@@ -19,6 +19,7 @@   delete, deleteNoPH,   ) where +import Language.SQL.Keyword (Keyword) import Database.Relational.Schema.SQLite3.Config (config) import Database.Relational hiding   (relationalQuery,@@ -27,7 +28,9 @@    delete, deleteNoPH, )  -- | From 'Relation' into typed 'Query' with suffix SQL words.-relationalQuery :: Relation p r -> QuerySuffix -> Query p r+relationalQuery :: Relation p r  -- ^ relation to finalize building+                -> [Keyword]     -- ^ suffix SQL words. for example, `[FOR, UPDATE]`, `[FETCH, FIRST, "3", ROWS, ONLY]` ...+                -> Query p r     -- ^ finalized query relationalQuery = relationalQuery_ config  -- | Make 'Insert' from derived table and monadic builded 'Register' object.
src/Database/Relational/Schema/PostgreSQL.hs view
@@ -38,7 +38,7 @@  import Database.Relational   (Query, relationalQuery, Relation, query, query', relation', relation, union,-   wheres, (.=.), (.>.), in', values, (!), fst', snd',+   wheres, (.=.), (.>.), not', in', values, (!), fst', snd',    placeholder, asc, value, unsafeProjectSql, (><))  import Database.Relational.Schema.PostgreSQL.Config@@ -78,6 +78,7 @@             -- ("money",        [t| Decimal |]),             ("bpchar",       [t| String |]),             ("varchar",      [t| String |]),+            ("uuid",         [t| String |]),             ("date",         [t| Day |]),             ("time",         [t| TimeOfDay |]),             ("timestamp",    [t| LocalTime |]),@@ -148,13 +149,12 @@   wheres $ att ! Attr.atttypid'    .=. typ ! Type.oid'   wheres $ typ ! Type.typtype'     .=. value 'b'  -- 'b': base type only -  wheres $ typ ! Type.typcategory' `in'` values [ 'B' -- Boolean types-                                                , 'D' -- Date/time types-                                                , 'I' -- Network Address types-                                                , 'N' -- Numeric types-                                                , 'S' -- String types-                                                , 'T' -- typespan types-                                                ]+  wheres $ not' $ typ ! Type.typcategory' `in'`+                  values+                  [ 'C' -- Composite types+                  , 'P' -- Pseudo-types+                  , 'X' -- unknown type+                  ]    asc $ att ! Attr.attnum'