Skip to content


Subversion checkout URL

You can clone with
Download ZIP
Browse files

[spec] test .WHAT and .perl on actual enums, masak++

git-svn-id: c213334d-75ef-0310-aa23-eaa082d1ae64
  • Loading branch information...
1 parent d5c0554 commit a8b77bc6a4f3e7846997aabf9f1ac4df2ec6cd3d moritz committed
Showing with 4 additions and 1 deletion.
  1. +4 −1 S12-enums/thorough.t
5 S12-enums/thorough.t
@@ -2,7 +2,7 @@ use v6;
use Test;
-plan 65;
+plan 67;
=begin description
@@ -14,6 +14,9 @@ Enum tests from L<S12/Enums>
# L<S12/Enums/values are specified as a list>
enum day <Sun Mon Tue Wed Thu Fri Sat>;
+ok day.WHAT, 'enum.WHAT returned a value';
+ok day.perl, 'enum.perl returned a value';
#?DOES 14
sub test_stuff($x) {
ok not $x does Wed, "basic enum mixing worked ($x-2)";

0 comments on commit a8b77bc

Please sign in to comment.
Something went wrong with that request. Please try again.