diff options
Diffstat (limited to 'tests')
-rw-r--r-- | tests/agg.ur | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/agg.ur b/tests/agg.ur index dc7c0341..7e091060 100644 --- a/tests/agg.ur +++ b/tests/agg.ur @@ -12,8 +12,8 @@ val q5 = (SELECT SUM(t1.A) AS X FROM t1 GROUP BY t1.B) datatype list a = Nil | Cons of a * list a -val r1 : transaction (list int) = - query q1 +val r1 : transaction (list string) = + query q4 (fn fs acc => return (Cons (fs.X, acc))) Nil |