diff options
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/010/hash.tl | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/tests/010/hash.tl b/tests/010/hash.tl index 7f662b51..558688af 100644 --- a/tests/010/hash.tl +++ b/tests/010/hash.tl @@ -20,3 +20,10 @@ (#\s 3) (#\u 1) (#\v 1) (#\y 1)) [group-reduce (hash) evenp + (range 1 10) 0] #H(() (t 30) (nil 25))) + +(mtest + (hash-props) #H(()) + (hash-props 1 2) #H(() (1 2)) + (hash-props 1 2 'a 'b) #H(() (1 2) (a b)) + (hash-props 1) :error + (hash-props 1 2 'a) :error) |