[perl #76238] Bool.pick always returns false.

# New Ticket Created by  lembark@wrkhors.com 
# Please include the string:  [perl #76238]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=76238 >


Using the June release:

$ perl6 --version
This compiler is built with the Parrot Compiler Toolkit, parrot revision 47640.

Attempting to print some random numers via Bool.pick
gives no output:

    #!/opt/parrot/bin/perl6

    use v6;

    .say if Bool.pick for ^100;

    $ perl6 hak
    $

The same basic process using (0..1) does work:

    $ cat hak
    #!/opt/parrot/bin/perl6

    use v6;

    .say if (^2).pick for ^100;

    $ perl6 hak
    0
    2
    3
    4
    <snip>


I get the same result from the command line with a file
or the perl6 interactive prompt.

-- 
Steven Lembark                                          85-09 90th St.
Workhorse Computing                               Woodhaven, NY, 11421
lembark@wrkhors.com                                    +1 888 359 3508

• Re: [perl #76238] Bool.pick always returns false. by Steven Lembark
• [perl #76238] Bool.pick always returns false. by lembark @ wrkhors . com
• [perl #76238] Bool.pick always returns false. by Patrick R. Michaud via RT
• Re: [perl #76238] Bool.pick always returns false. by Mark J. Reed
• [perl #76238] Bool.pick always returns false. by Carl Mäsak via RT
• Re: [perl #76238] Bool.pick always returns false. by Mark J. Reed