git.iko.soy/rel8
on master help sign in
Rename runAggregation and add distributeAggregate
742f683Shane O'Brien
src/Rel8.hs+2−1
compare with master
unifiedsplit
@@ -182,7 +182,8 @@ module Rel8
182 -- ** Aggregation
182 -- ** Aggregation
183 , Aggregate
183 , Aggregate
184 , aggregate
184 , aggregate
185− , runAggregation
185+ , sequenceAggregate
186+ , distrubteAggregate
186 , listAgg
187 , listAgg
187 , nonEmptyAgg
188 , nonEmptyAgg
188 , groupBy
189 , groupBy
src/Rel8/Table/Aggregate.hs+8−3
@@ -9,7 +9,8 @@ module Rel8.Table.Aggregate
9 ( groupBy
9 ( groupBy
10 , listAgg
10 , listAgg
11 , nonEmptyAgg
11 , nonEmptyAgg
12− , runAggregation
12+ , sequenceAggregate
13+ , distributeAggregate
13 )
14 )
14where
15where
15
16
@@ -74,5 +75,9 @@ nonEmptyAgg (toColumns -> exprs) = fromColumns $
74 (pure exprs)
75 (pure exprs)
75
76
76
77
77−runAggregation :: Aggregates aggregates exprs => aggregates -> Aggregate exprs
78+sequenceAggregate :: Aggregates aggregates exprs => aggregates -> Aggregate exprs
79+sequenceAggregate = fromColumns . toColumns
80+
81+
82+distributeAggregate :: Aggregates aggregates exprs => Aggregate exprs -> aggregates
78−runAggregation = fromColumns . toColumns
83+distributeAggregate = fromColumns . toColumns