Skip to content

Commit

Permalink
Tests for R#2514
Browse files Browse the repository at this point in the history
  • Loading branch information
@lizmat
lizmat committed Dec 5, 2018
1 parent f7d48bc commit 771ab61
Show file tree
Hide file tree
Showing 4 changed files with 36 additions and 0 deletions.
9 changes: 9 additions & 0 deletions S03-operators/set_addition.t
View file
Expand Up @@ -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,
Expand All @@ -48,6 +51,9 @@ my @triplets =
<a b c>.SetHash, <b c d>.SetHash, <a b b c c d>.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,
Expand All @@ -66,6 +72,9 @@ my @triplets =
<a b b c>.BagHash, <b c d>.BagHash, <a b b b c c d>.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,
Expand Down
9 changes: 9 additions & 0 deletions S03-operators/set_intersection.t
View file
Expand Up @@ -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(),
Expand All @@ -48,6 +53,8 @@ my @triplets =
<a b c>.SetHash, <b c d>.SetHash, <b c>.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(),
Expand All @@ -66,6 +73,8 @@ my @triplets =
<a b b c>.BagHash, <b c d>.BagHash, <b c>.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(),
Expand Down
9 changes: 9 additions & 0 deletions S03-operators/set_multiply.t
View file
Expand Up @@ -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(),
Expand All @@ -48,6 +51,10 @@ my @triplets =
<a b c>.SetHash, <b c d>.SetHash, <b c>.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(),
Expand All @@ -66,6 +73,8 @@ my @triplets =
<a b b c>.BagHash, <b c d>.BagHash, <b b c>.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(),
Expand Down
9 changes: 9 additions & 0 deletions S03-operators/set_union.t
View file
Expand Up @@ -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(),
Expand All @@ -51,6 +56,8 @@ my @triplets =
<a b>.SetHash, <c d>.SetHash, <a b c d>.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(),
Expand All @@ -67,6 +74,8 @@ my @triplets =
<a b b>.BagHash, <c d>.BagHash, <a b b c d>.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(),
Expand Down

0 comments on commit 771ab61

Please sign in to comment.