[perl #130168] [BUG] Interval supplies < 1ms can get stuck

[via RT]

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


See discussion starting at:

    https://irclog.perlgeek.de/perl6-dev/2016-11-24#i_13623505

In short, if the interval is too short, the supply will stop progressing:

06:54 < jnthn> m: react { whenever Supply.interval(.001) { .say; done
if $_ == 5 } }
06:54 < camelia> rakudo-moar 1b840f: OUTPUT«0␤1␤2␤3␤4␤5␤»
06:54 < jnthn> m: react { whenever Supply.interval(.0001) { .say; done
if $_ == 5 } }
06:54 < camelia> rakudo-moar 1b840f: OUTPUT«(timeout)0␤»
06:54 < jnthn> Yup, that's decidedly wrong.