From 771ab61bf47680d7447e1e33e75a0fe1363794f1 Mon Sep 17 00:00:00 2001 From: Elizabeth Mattijsen Date: Wed, 5 Dec 2018 12:31:45 +0100 Subject: [PATCH] Tests for R#2514 --- S03-operators/set_addition.t | 9 +++++++++ S03-operators/set_intersection.t | 9 +++++++++ S03-operators/set_multiply.t | 9 +++++++++ S03-operators/set_union.t | 9 +++++++++ 4 files changed, 36 insertions(+) diff --git a/S03-operators/set_addition.t b/S03-operators/set_addition.t index 981ca7e419..a814b70105 100644 --- a/S03-operators/set_addition.t +++ b/S03-operators/set_addition.t @@ -30,6 +30,9 @@ my @pairs = my @triplets = # result should be a Bag(Hash) + Set, Set, bag(Set,Set), + Set, set(), bag(Set), + set(), Set, bag(Set), set(), set(), bag(), Set.new, SetHash.new, bag(), SetHash.new, Set.new, ().BagHash, @@ -48,6 +51,9 @@ my @triplets = .SetHash, .SetHash, .BagHash, # result should be a Bag(Hash) + Bag, Bag, bag(Bag,Bag), + Bag, bag(), bag(Bag), + bag(), Bag, bag(Bag), bag(), bag(), bag(), Bag.new, BagHash.new, bag(), BagHash.new, Bag.new, ().BagHash, @@ -66,6 +72,9 @@ my @triplets = .BagHash, .BagHash, .BagHash, # result should be a Mix(Hash) + Mix, Mix, mix(Mix,Mix), + Mix, mix(), mix(Mix), + mix(), Mix, mix(Mix), mix(), mix(), mix(), Mix.new, MixHash.new, mix(), MixHash.new, Mix.new, ().MixHash, diff --git a/S03-operators/set_intersection.t b/S03-operators/set_intersection.t index ed1c472f1f..1151147285 100644 --- a/S03-operators/set_intersection.t +++ b/S03-operators/set_intersection.t @@ -30,6 +30,11 @@ my @pairs = my @triplets = # result should be a Set(Hash) + Set, Set, set(Set), + Bag, Bag, set(Bag), + Mix, Mix, set(Mix), + Set, set(), set(), + set(), Set, set(), set(), set(), set(), SetHash.new, set(), SetHash.new, set(), SetHash.new, set(), @@ -48,6 +53,8 @@ my @triplets = .SetHash, .SetHash, .SetHash, # result should be a Bag(Hash) + Bag, bag(), bag(), + bag(), Bag, bag(), bag(), bag(), bag(), BagHash.new, bag(), BagHash.new, bag(), BagHash.new, bag(), @@ -66,6 +73,8 @@ my @triplets = .BagHash, .BagHash, .BagHash, # result should be a Mix(Hash) + Mix, mix(), mix(), + mix(), Mix, mix(), mix(), mix(), mix(), MixHash.new, mix(), MixHash.new, mix(), MixHash.new, mix(), diff --git a/S03-operators/set_multiply.t b/S03-operators/set_multiply.t index a824a3055e..588d681d72 100644 --- a/S03-operators/set_multiply.t +++ b/S03-operators/set_multiply.t @@ -30,6 +30,9 @@ my @pairs = my @triplets = # using sets, should return a Bag(Hash) + Set, Set, bag(Set), + Set, set(), bag(), + set(), Set, bag(), set(), set(), bag(), SetHash.new, set(), BagHash.new, set(), SetHash.new, bag(), @@ -48,6 +51,10 @@ my @triplets = .SetHash, .SetHash, .BagHash, # using bags, should return a Bag(Hash) + Bag, Bag, bag(Bag), + Mix, Mix, bag(Mix), + Bag, bag(), bag(), + bag(), Bag, bag(), bag(), bag(), bag(), BagHash.new, bag(), BagHash.new, bag(), BagHash.new, bag(), @@ -66,6 +73,8 @@ my @triplets = .BagHash, .BagHash, .BagHash, # using mixes, should return a Mix(Hash) + Mix, mix(), mix(), + mix(), Mix, mix(), mix(), mix(), mix(), MixHash.new, mix(), MixHash.new, mix(), MixHash.new, mix(), diff --git a/S03-operators/set_union.t b/S03-operators/set_union.t index 909b83bfaa..df7a3895da 100644 --- a/S03-operators/set_union.t +++ b/S03-operators/set_union.t @@ -35,6 +35,11 @@ my @pairs = my @triplets = # result should be a Set(Hash) + Set, Set, set(Set), + Bag, Bag, set(Bag), + Mix, Mix, set(Mix), + Set, set(), set(Set), + set(), Set, set(Set), set(), set(), set(), SetHash.new, set(), SetHash.new, set(), SetHash.new, set(), @@ -51,6 +56,8 @@ my @triplets = .SetHash, .SetHash, .SetHash, # result should be a Bag(Hash) + Bag, bag(), bag(Bag), + bag(), Bag, bag(Bag), bag(), bag(), bag(), BagHash.new, bag(), BagHash.new, bag(), BagHash.new, bag(), @@ -67,6 +74,8 @@ my @triplets = .BagHash, .BagHash, .BagHash, # result should be a Mix(Hash) + Mix, mix(), mix(Mix), + mix(), Mix, mix(Mix), mix(), mix(), mix(), MixHash.new, mix(), MixHash.new, mix(), MixHash.new, mix(),