khibino/haskell-relational-record
1
1
Fork 0
mirror of https://github.com/khibino/haskell-relational-record.git synced 2024-11-29 06:37:03 +03:00
Code Issues Projects Releases Wiki Activity

relational-query: add enableWarning to configuration.

Browse Source
This commit is contained in:
Kei Hibino 2018-06-12 17:57:40 +09:00
parent c38dc9b61f
commit 782f0a7d17
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
relational-query/src/Database/Relational/Internal/Config.hs
View File

@ -20,6 +20,7 @@ module Database.Relational.Internal.Config (
chunksInsertSize, chunksInsertSize,
schemaNameMode, schemaNameMode,
normalizedTableName, normalizedTableName,
enableWarning,
verboseAsCompilerWarning, verboseAsCompilerWarning,
disableOverloadedProjection, disableOverloadedProjection,
disableSpecializedProjection, disableSpecializedProjection,
@ -81,6 +82,8 @@ data Config =
-- ^ 'SchemaNameMode' configuration -- ^ 'SchemaNameMode' configuration
, normalizedTableName :: !Bool , normalizedTableName :: !Bool
-- ^ If True, schema names become uppercase, and table names become lowercase. -- ^ If True, schema names become uppercase, and table names become lowercase.
, enableWarning :: !Bool
-- ^ If True, print warning messages in macros of relational-record.
, verboseAsCompilerWarning :: !Bool , verboseAsCompilerWarning :: !Bool
-- ^ If True, more detailed logs are printed when generating record types from schema. -- ^ If True, more detailed logs are printed when generating record types from schema.
, disableOverloadedProjection :: !Bool , disableOverloadedProjection :: !Bool
@ -121,6 +124,7 @@ defaultConfig =
, chunksInsertSize = 256 , chunksInsertSize = 256
, schemaNameMode = SchemaQualified , schemaNameMode = SchemaQualified
, normalizedTableName = True , normalizedTableName = True
, enableWarning = True
, verboseAsCompilerWarning = False , verboseAsCompilerWarning = False
, disableOverloadedProjection = False , disableOverloadedProjection = False
, disableSpecializedProjection = False , disableSpecializedProjection = False