# New Ticket Created by  Michael Schaap 
# Please include the string:  [perl #130723]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org/Ticket/Display.html?id=130723 >


On my self-compiled Linux build of Rakudo Star 2017.01:

% perl6 -e 'say (-524288..^524288).pick(50)'
(445052 -427 442649 66610 133030 238409 -250288 438259 508787 423778 
90030 28568 -372417 143522 -335109 -156474 -395940 -124515 517779 398864 
-494020 -303173 -4646 253705 -263919 204704 328943 -230539 276553 
-142475 -311381 -224414 410534 -58726 -27584 -135264 -222462 79964 
-177401 -413056 -279021 -445158 -161601 61337 -101262 -66850 -285553 
-506522 366891 289163)

This looks pretty normal.

But on my Windows machine, using the 64-bit version of Rakudo Star 
2017.01, downloaded from http://rakudo.org/downloads/star/ , I get:

% perl6 -e 'say (-524288..^524288).pick(50)'
(-504365 -504962 -520900 -503012 -504515 -514927 -524063 -511982 -503130 
-511610 -515842 -518903 -505137 -513172 -504845 -512334 -513608 -518507 
-512159 -508672 -492893 -503150 -501718 -515295 -495598 -513483 -507283 
-493687 -494653 -498803 -497266 -519193 -510278 -503827 -501717 -514772 
-507593 -500763 -509913 -509046 -523590 -516283 -499038 -501134 -499195 
-496352 -495618 -522092 -504550 -498746)

I.e., I consistently get numbers close to the bottom end of the range.

Reply via email to