It works now!
whoever fixed it++. Close this! (and #125758).
On Mon, May 2, 2016 at 11:34 PM Will Coleda via RT <
perl6-bugs-follo...@perl.org> wrote:
> On Wed Apr 27 03:02:14 2016, lloyd.fo...@gmail.com wrote:
> > 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
> > >>
> > >
>
> Can you include the output of sw_vers and perl6 --version ?
>
> --
> Will "Coke" Coleda
>
