diff options
Diffstat (limited to 'tests/expression_query.ml')
-rw-r--r-- | tests/expression_query.ml | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/tests/expression_query.ml b/tests/expression_query.ml index 367a1e2..a9840b7 100644 --- a/tests/expression_query.ml +++ b/tests/expression_query.ml @@ -154,6 +154,18 @@ let max = assert_equal expected content +let max_no_partition = + "max" >:: fun _ -> + let expr = eval @@ Expr.(max (path ":C") [] [ path ":A"; path ":B" ]) in + + let content = test_expr expr + and expected = + "LAST_VALUE(:C) OVER (ORDER BY :A, :B RANGE BETWEEN UNBOUNDED PRECEDING \ + AND UNBOUNDED FOLLOWING)" + in + + assert_equal expected content + let in_int = "in_int" >:: fun _ -> let expr = @@ -219,6 +231,7 @@ let test_suit = not_in_string; in_int; max; + max_no_partition; counter_no_order; counter_order; cmp; |