add group to composition tests

13 years ago · b3cbead806
parent a723338316
commit b3cbead806
1 changed files with 10 additions and 9 deletions
--- a/tests/composition-test.scm
+++ b/tests/composition-test.scm
@ -1,6 +1,7 @@
 (use test)
 (import ssql)

+(test-group "composition"
  (test "simple"
    '(select (columns firstname lastname) (from artists) (where (= firstname "Frank")))
    (ssql-compose #f
@ -10,4 +11,4 @@
  (test "merge"
    '(select (columns firstname lastname age) (from artists) (order firstname lastname))
    (ssql-compose #f '(select (columns firstname lastname) (order firstname))
-                '((columns age) (from artists) (order lastname))))
+                  '((columns age) (from artists) (order lastname)))))