Adds test cases for remaining TSet procs.

This commit is contained in:
Grzegorz Adam Hankiewicz 2014-07-26 19:12:57 +02:00
commit 6c3b967de3

View file

@ -425,6 +425,10 @@ proc testModule() =
assert e == toSet[string](["a"]) assert e == toSet[string](["a"])
var f = symmetricDifference(a, b) var f = symmetricDifference(a, b)
assert f == toSet[string](["a", "c"]) assert f == toSet[string](["a", "c"])
assert d < a and d < b
assert((a < a) == false)
assert d <= a and d <= b
assert((a <= a))
# Alias test. # Alias test.
assert a + b == toSet[string](["a", "b", "c"]) assert a + b == toSet[string](["a", "b", "c"])
assert a * b == toSet[string](["b"]) assert a * b == toSet[string](["b"])
@ -433,6 +437,11 @@ proc testModule() =
assert disjoint(a, b) == false assert disjoint(a, b) == false
assert disjoint(a, b - a) == true assert disjoint(a, b - a) == true
block mapSet:
var a = toSet[int]([1, 2, 3])
var b = a.map(proc (x: int): string = $x)
assert b == toSet[string](["1", "2", "3"])
block isValidTest: block isValidTest:
var cards: TOrderedSet[string] var cards: TOrderedSet[string]
proc saveTarotCards(cards: TOrderedSet[string]) = proc saveTarotCards(cards: TOrderedSet[string]) =