relational-query 0.0.1.9 → 0.0.1.10

raw patch · 2 files changed

+4/−4 lines, 2 files

Files

• relational-query.cabal +1/−1
• src/Database/Relational/Query/Type.hs +3/−3

@@ -1,5 +1,5 @@ name:                relational-query-version:             0.0.1.9+version:             0.0.1.10 synopsis:            Typeful, Modular, Relational, algebraic query engine description:         This package contiains typeful relation structure and                      relational-algebraic query building DSL which can

@@ -93,7 +93,7 @@ unsafeTypedKeyUpdate :: Pi a p -> String -> KeyUpdate p a unsafeTypedKeyUpdate =  KeyUpdate --- | Make typed 'KeyUpdate' from 'Table' and key indexes.+-- | Make typed 'KeyUpdate' from 'Table' and key columns selector 'Pi'. typedKeyUpdate :: Table a -> Pi a p -> KeyUpdate p a typedKeyUpdate tbl key = unsafeTypedKeyUpdate key $ updateOtherThanKeySQL tbl key @@ -183,12 +183,12 @@ unsafeTypedInsert :: String -> Insert a unsafeTypedInsert q = unsafeTypedInsert' q q 1 --- | Make typed 'Insert' from columns selector 'Pi' and 'Table'.+-- | Make typed 'Insert' from 'Table' and columns selector 'Pi' with configuration parameter. typedInsert' :: Config -> Table r -> Pi r r' -> Insert r' typedInsert' config tbl pi' = unsafeTypedInsert' (insertSQL pi' tbl) ci n  where   (ci, n) = insertSizedChunkSQL pi' tbl $ chunksInsertSize config --- | Make typed 'Insert' from columns selector 'Pi' and 'Table'.+-- | Make typed 'Insert' from 'Table' and columns selector 'Pi'. typedInsert :: Table r -> Pi r r' -> Insert r' typedInsert =  typedInsert' defaultConfig