diff options
Diffstat (limited to 'tests/test.mew')
-rw-r--r-- | tests/test.mew | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/tests/test.mew b/tests/test.mew index ba9c223..13817b0 100644 --- a/tests/test.mew +++ b/tests/test.mew @@ -803,3 +803,7 @@ (test #(1 2 3) (loc (v #(3 1 2)) (sort! v) v)) (test #(3 2 1) (loc (v #(3 1 2)) (sort! v >) v)) (test-error (sort! '(3 2 1)))) + +(test-group "sort-by" + (test '("foobar" "zing" "baz") (sort-by '("foobar" "zing" "baz") + (op - (len _))))) |