Fix faulty tests

lizmat · lizmat · commit 291b557e0dea · 2017-07-12T11:19:21.000+02:00
diff --git a/S03-operators/mix.t b/S03-operators/mix.t
@@ -81,12 +81,12 @@ ok mix(my @large_arr = ("a"...*)[^50000]), "... a large array goes into a bar -
     my $buper = (n => 2.2, e => 4.4, d => 2.2, y => 2.2).Mix;
 
     ok $b ⊂ $bub, "⊂ - {$b.gist} is a strict submix of {$bub.gist}";
-    ok $bub ⊄ $buper, "⊄ - {$bub.gist} is not a strict submix of {$buper.gist}";
+    nok $bub ⊄ $buper, "⊄ - {$bub.gist} is a strict submix of {$buper.gist}";
     ok $bub ⊃ $b, "⊃ - {$bub.gist} is a strict supermix of {$b.gist}";
     ok $b (<) $bub, "(<) - {$b.gist} is a strict submix of {$bub.gist} (texas)";
-    ok $bub !(<) $buper, "!(<) - {$bub.gist} is not a strict submix of {$buper.gist} (texas)";
+    nok $bub !(<) $buper, "!(<) - {$bub.gist} is a strict submix of {$buper.gist} (texas)";
     ok $bub (>) $b, "(>) - {$bub.gist} is a strict supermix of {$b.gist} (texas)";
-    ok $buper !(>) $bub, "!(>) - {$buper.gist} is not a strict supermix of {$bub.gist}";
+    nok $buper !(>) $bub, "!(>) - {$buper.gist} is a strict supermix of {$bub.gist}";
 }
 
 {

Original file line number	Diff line number	Diff line change
`@@ -81,12 +81,12 @@ ok mix(my @large_arr = ("a"...*)[^50000]), "... a large array goes into a bar -`
`81`	`81`	`my $buper = (n => 2.2, e => 4.4, d => 2.2, y => 2.2).Mix;`
`82`	`82`
`83`	`83`	`ok $b ⊂ $bub, "⊂ - {$b.gist} is a strict submix of {$bub.gist}";`
`84`		`- ok $bub ⊄ $buper, "⊄ - {$bub.gist} is not a strict submix of {$buper.gist}";`
	`84`	`+ nok $bub ⊄ $buper, "⊄ - {$bub.gist} is a strict submix of {$buper.gist}";`
`85`	`85`	`ok $bub ⊃ $b, "⊃ - {$bub.gist} is a strict supermix of {$b.gist}";`
`86`	`86`	`ok $b (<) $bub, "(<) - {$b.gist} is a strict submix of {$bub.gist} (texas)";`
`87`		`- ok $bub !(<) $buper, "!(<) - {$bub.gist} is not a strict submix of {$buper.gist} (texas)";`
	`87`	`+ nok $bub !(<) $buper, "!(<) - {$bub.gist} is a strict submix of {$buper.gist} (texas)";`
`88`	`88`	`ok $bub (>) $b, "(>) - {$bub.gist} is a strict supermix of {$b.gist} (texas)";`
`89`		`- ok $buper !(>) $bub, "!(>) - {$buper.gist} is not a strict supermix of {$bub.gist}";`
	`89`	`+ nok $buper !(>) $bub, "!(>) - {$buper.gist} is a strict supermix of {$bub.gist}";`
`90`	`90`	`}`
`91`	`91`
`92`	`92`	`{`