relational-query 0.0.1.1 → 0.0.1.2

raw patch · 2 files changed

+9/−5 lines, 2 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• relational-query.cabal +1/−1
• src/Database/Relational/Query/Sub.hs +8/−4

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

@@ -152,10 +152,14 @@ -- | Normalized column SQL normalizedSQL :: SubQuery -> StringSQL normalizedSQL =  d  where-  d (Table t)             =  fromTableToNormalizedSQL t-  d sub@(Bin {})          =  showUnitSQL sub-  d sub@(Flat {})         =  showUnitSQL sub-  d sub@(Aggregated {})   =  showUnitSQL sub+  d (Table t)                 =  fromTableToNormalizedSQL t+  d sub@(Bin {})              =  showUnitSQL sub+  d sub@(Flat _ _ _ _ _ ots)+    | null ots                =  showSQL sub+    | otherwise               =  showUnitSQL sub+  d sub@(Aggregated _ _ _ _ _ _ _ ots)+    | null ots                =  showSQL sub+    | otherwise               =  showUnitSQL sub  selectPrefixSQL :: UntypedProjection -> Duplication -> StringSQL selectPrefixSQL up da = SELECT <> showsDuplication da <>