Hi there,
I need your help. I've been playing around with the code example from
IO::Socket::Async::SSL and I am to stupid to get a propper error
handling to work.
use v6;
use IO::Socket::Async::SSL;
react {
my %ssl-config =
certificate-file => 'cert.pem',
private-key-fil
It took me a while, but I just found jnthn's automatic retry code for
supply-based things again.
It's in these slides
http://jnthn.net/papers/2017-perl6-concurrency-pcp.pdf on page 83
You'll want to use "supply" instead of "react" for your server and pass
that to the auto-retry function.
I've changed the code to this, It's better but still not correct.
1) curl with http hangs and must be terminated with Ctrl+C
2) the code now restarts the server socket, which I also dont expect to
happen.
use v6;
use IO::Socket::Async::SSL;
sub auto-restart(Supply $incoming) {
supply {
On Fri, 13 Oct 2017 20:43:42 -0700, alex.jakime...@gmail.com wrote:
> Code:
> my $s1 = Supplier.new; $s1.Supply.tap: { say $_; $s1.emit(2) if $++ <
> 5; say "here" }; $s1.emit(1)
>
>
> ¦2017.06:
> 1
> 2
> 2
> 2
> 2
> 2
> here
> here
> here
> here
> here
> here
>
> ¦HEAD(012c80f):
> 1
> here
> 2
On Fri, 13 Oct 2017 20:43:42 -0700, alex.jakime...@gmail.com wrote:
> Code:
> my $s1 = Supplier.new; $s1.Supply.tap: { say $_; $s1.emit(2) if $++ <
> 5; say "here" }; $s1.emit(1)
>
>
> ¦2017.06:
> 1
> 2
> 2
> 2
> 2
> 2
> here
> here
> here
> here
> here
> here
>
> ¦HEAD(012c80f):
> 1
> here
> 2
On Mon, 16 Oct 2017 07:42:06 -0700, jn...@jnthn.net wrote:
> So the question is if we can find a way to have 2 and 4, while
> retaining 1 and 3, and at what cost.
Also noting that in order to preserve 3, then in a situation like:
* "Thread" 1 sends message A
* Handler for message A starts running
On Fri, 13 Oct 2017 10:13:36 -0700, jdv79 wrote:
> The symptom is that sometimes (90%+ on my box and ungolfed) the program
> seems to stall out on the qqx line. The last thing that is printed is
> "before". But on earlier commits (that actually build) no such
> stallage
> happened for a couple m
On Fri, 13 Oct 2017 10:13:36 -0700, jdv79 wrote:
> The symptom is that sometimes (90%+ on my box and ungolfed) the program
> seems to stall out on the qqx line. The last thing that is printed is
> "before". But on earlier commits (that actually build) no such
> stallage
> happened for a couple m
Right. Then I guess it's not a regression. Tag removed.
On 2017-10-16 07:42:06, jn...@jnthn.net wrote:
> On Fri, 13 Oct 2017 20:43:42 -0700, alex.jakime...@gmail.com wrote:
> > Code:
> > my $s1 = Supplier.new; $s1.Supply.tap: { say $_; $s1.emit(2) if $++ <
> > 5; say "here" }; $s1.emit(1)
> >
> >
On Sat, 16 Jul 2016 13:18:42 -0700, barto...@gmx.de wrote:
> I unfudged one test for this ticket in S04-statements/label.t with
> commit https://github.com/perl6/roast/commit/ef7b0da83d
>
> The code that used to segfault works fine now:
>
> $ perl6-m -e 'A: for 1 { for 1 { last A }; CONTROL { whe
# New Ticket Created by Aleks-Daniel Jakimenko-Aleksejev
# Please include the string: [perl #132313]
# in the subject line of all future correspondence about this issue.
# https://rt.perl.org/Ticket/Display.html?id=132313 >
Code:
say 1.1
Result (2014.01 .. d6a9eda):
1.111
On Mon, 16 Oct 2017 16:23:05 -0700, alex.jakime...@gmail.com wrote:
> Code:
> say 1.1
>
> Result (2014.01 .. d6a9eda):
> 1.1604544
>
>
> The number itself is stored as a Rat so there should be no problem
> presenting it in a better way.
*clicks take*
On Mon, 16 Oct 2017 16:23:05 -0700, alex.jakime...@gmail.com wrote:
> Code:
> say 1.1
>
> Result (2014.01 .. d6a9eda):
> 1.1604544
>
>
> The number itself is stored as a Rat so there should be no problem
> presenting it in a better way.
*clicks take*
FWIW the title is very misleading, see this discussion:
https://irclog.perlgeek.de/perl6/2017-10-16#i_15312269
On 2017-10-16 16:23:05, alex.jakime...@gmail.com wrote:
> Code:
> say 1.1
>
> Result (2014.01 .. d6a9eda):
> 1.1604544
>
>
> The number itself is store
Someone should mention perl6 :-)
http://profsjt.blogspot.com.au/2017/10/is-haskell-right-language-for-teaching.html
--
Norman Gaywood, Computer Systems Officer
School of Science and Technology
University of New England
Armidale NSW 2351, Australia
ngayw...@une.edu.au http://turing.une.edu.au/~
It'd probably be just as useful to reply here:
https://news.ycombinator.com/item?id=15483195
On Mon, Oct 16, 2017 at 5:03 PM, Norman Gaywood wrote:
> Someone should mention perl6 :-)
>
> http://profsjt.blogspot.com.au/2017/10/is-haskell-right-
> language-for-teaching.html
>
> --
> Norman Gaywood
No, sorry. I meant that I only tested for a couple minutes at each
commit.
Commits before the one bisect found never manifested the issue.
On 2017.10.16 10:52 am, jn...@jnthn.net via RT wrote:
> On Fri, 13 Oct 2017 10:13:36 -0700, jdv79 wrote:
>> The symptom is that sometimes (90%+ on my box and
No, sorry. I meant that I only tested for a couple minutes at each
commit.
Commits before the one bisect found never manifested the issue.
On 2017.10.16 10:52 am, jn...@jnthn.net via RT wrote:
On Fri, 13 Oct 2017 10:13:36 -0700, jdv79 wrote:
The symptom is that sometimes (90%+ on my box and un
When panda was first introduced as the first module or package manager,
a file containing the meta information for all the modules, located at
"http://ecosystem-api.p6c.org/projects.json"; was established.
At the time, the developers said that the meta information file was
designed to be agnos
When panda was first introduced as the 'adopted' module or package
manager for rakudo, a file containing the meta information for all the
modules, located at "http://ecosystem-api.p6c.org/projects.json";, was
established.
At the time, the developers said that the meta information file was
des
20 matches
Mail list logo
