Skip to content

Commit

Permalink
[t/spec] something wrong with .pick on an enum
Browse files Browse the repository at this point in the history
git-svn-id: http://svn.pugscode.org/pugs@27886 c213334d-75ef-0310-aa23-eaa082d1ae64
  • Loading branch information
kyle committed Aug 6, 2009
1 parent 1bbab36 commit 6179fc2
Showing 1 changed file with 5 additions and 1 deletion.
6 changes: 5 additions & 1 deletion S12-enums/basic.t
@@ -1,6 +1,6 @@
use v6;
use Test;
plan 30;
plan 32;

# Very basic enum tests

Expand Down Expand Up @@ -91,6 +91,10 @@ dies_ok({ my Color $c3 = "for the fail" }, 'enum as a type enforces checks');

# L<S12/Enums/"define a .pick method">
{
#?rakudo 2 todo 'Color.pick'
lives_ok { my Color $k = Color.pick }, 'Color.pick assigns to Color var';
isa_ok Color.pick, Color.pick.WHAT, 'Color.pick.isa';

ok ?(Color.pick == any(Color::white, Color::gray, Color::black)),
'.pick on enums';
ok Color.pick(2) == 2, '.pick(2) on enums';
Expand Down

0 comments on commit 6179fc2

Please sign in to comment.