Now I'm at home I tried it on my Mac,  I can confirm that:

perl6 -e 'my $waiter = Proc::Async.new(:path<echo>, :args<Hello
World>).start; await start { await $waiter }'

prints Hello World and then hangs forever.

On Wed, Apr 27, 2016 at 2:58 PM Lloyd Fournier <lloyd.fo...@gmail.com>
wrote:

> Not sure if it's relevant here but last time I checked there is an issues
> with await and Proc::Async on Mac.
>
> RT #125758 for example which looks similar to this.
> On Wed, 27 Apr 2016 at 7:08 AM, Will Coleda via RT <
> perl6-bugs-follo...@perl.org> wrote:
>
>> On Fri Sep 05 14:44:06 2014, elizabeth wrote:
>> > (since leont has been so busy with other stuff, I thought to report
>> > the problem he found)
>> >
>> > 12:11   * leont suspects he's observing Promise.allof spinlocking or
>> > some such. 100% CPU usage, but no input is coming in :-/
>> > 12:19   lizmat  leont: could you gist that ?
>> > 12:22   leont   Would need to reduce it first, but sure
>> > 13:14   leont   My spinlock seems to have gone away when I await()ed
>> > in the same thread that created the Proc::Async…
>> > 13:16   lizmat  leont: interesting datapoint  :-)
>> > 13:16           wonder what jnthn would want to say about that  :-)
>> > 13:22   leont   perl6 -e 'my $waiter =
>> > Proc::Async.new(:path($*EXECUTABLE), :args(["helper.pl"])).start;
>> > await start { await $waiter };'
>> > 13:23           Let's make that easier: perl6 -e 'my $waiter =
>> > Proc::Async.new(:path("echo"), :args(<Hello World>)).start; await
>> > start { await $waiter };'
>> > 13:29   moritz  leont++ # golfing
>> > 13:30           leont: could you please submit that to
>> > rakudobugperl.org?
>> > 13:30   leont   Sure
>>
>> This seems to work with no issue here. Is this ticket closable?
>>
>> $ perl6 -e 'my $waiter = Proc::Async.new(:path("echo"), :args(<Hello
>> World>)).start; await start { await $waiter };'
>> Hello World
>>
>> --
>> Will "Coke" Coleda
>>
>

Reply via email to