diff --git a/S12-enums/pseudo-functional.t b/S12-enums/pseudo-functional.t index 283ad3b3d1..4eb341e08d 100644 --- a/S12-enums/pseudo-functional.t +++ b/S12-enums/pseudo-functional.t @@ -1,7 +1,7 @@ use v6; use Test; -plan 13; +plan 11; # L or C/enumeration supplies the type name as a coercion> @@ -18,9 +18,7 @@ is day(Tue), day(3), 'day(Tue) same as day(3)'; my $x = 'Today' but day(Tue); -ok $x ~~ day, 'day(Tue) is a day'; -ok $x ~~ Tue, 'day(Tue) is Tue'; -ok $x.does(Tue), 'day(Tue).does(Tue)'; +ok $x.day ~~ day, 'day(Tue).day is a day'; ok $x.day == Tue, 'day(Tue) == Tue'; ok day($x) == Tue, 'day(day(Tue)) == Tue'; ok $x.Tue, 'day(Tue).Tue';