perl6-projects.org/ | nopaste: sial.org/pbot/perl6 | evalbot: 'perl6: say 3;' | irclog: irc.pugscode.org/
Set by mncharity on 25 March 2009.
00:04 sephee joined 00:05 sephee left 00:07 sephee joined 00:27 DemoFreak left
skids rakudo: my $i; for 3 xx 100 { .print; die("limit") if $i++ > 9 } 00:41
p6eval rakudo 5c1952: OUTPUT«3Use of uninitialized value␤3333333333limit␤current instr.: 'die' pc 17498 (src/builtins/control.pir:225)␤»
skids rakudo: my $i = 1; for 3 xx 100 { .print; die("limit") if $i++ > 9 } 00:42
p6eval rakudo 5c1952: OUTPUT«3333333333limit␤current instr.: 'die' pc 17498 (src/builtins/control.pir:225)␤»
skids rakudo: my $i = 1; for 3 xx * { .print; die("limit") if $i++ > 9 }
p6eval rakudo 5c1952: OUTPUT«Use of uninitialized value␤»
skids rakudo: my $i = 1; for 3 xx Inf { .print; die("limit") if $i++ > 9 }
p6eval rakudo 5c1952: ( no output )
00:47 davidad joined
skids rakudo: my $i = 1; for 3..3:by(0) { .print; die("limit") if $i++ > 9 } 00:48
p6eval rakudo 5c1952: OUTPUT«Statement not terminated properly at line 1, near ":by(0) { ."␤␤current instr.: 'parrot;PGE;Util;die' pc 129 (runtime/parrot/library/PGE/Util.pir:85)␤»
00:50 frew|wor1 left 01:02 sri_kraih_ joined 01:04 ispy_ joined 01:10 abra left 01:11 cdarroch left 01:12 wknight8111 left 01:14 sitaram joined
rewt xx? 01:16
01:17 sri_kraih left 01:20 japhb left
skids rewt: list repetition operator 01:23
01:43 ispy_ left 02:10 ispy_ joined 02:12 ispy_ left 02:22 ispy_ joined 02:26 agentzh left 02:33 agentzh joined, cspencer left 02:43 ispy_ left 02:53 japhb joined 02:55 eternaleye joined 03:01 ispy_ joined 03:20 ispy_1 joined, ispy_ left 03:38 orafu left, orafu joined 03:44 Limbic_Region left, skids left 03:46 ispy_1 left 03:51 cspencer joined 03:57 alanhaggai joined 04:01 meppl joined 04:02 jedai joined 04:07 alester joined
mikehh rakudo (5c19526) builds on parrot r38277 - make test/make spectest PASS - Kubuntu Intrepid Amd64 04:09
04:19 amoc joined 04:44 amoc left 04:48 eternaleye left 04:50 eternaleye joined 05:13 frew|wor2 left
pmichaud Release has been cut... okay to start committing and bumping PARROT_REVISION again. 05:22
05:22 alanhaggai_ joined, alanhaggai left 05:23 alanhaggai_ is now known as alanhaggai
eternaleye Hey, which one of you all is Mark Lentczner? 05:40
About the periodic table of operators: The noble metaop Xop is marked as :diffy, but STD permits [X~]. I understand the reasoning for it being dissallowed in op=, so should :diffy be split into two adverbial tags? 05:41
std: say [X~] ( [1,2,3], [4,5,6], [7,8,9] ) 05:42
p6eval std 26367: OUTPUT«ok 00:03 38m␤»
eternaleye pugs: say [X~] ( [1,2,3], [4,5,6], [7,8,9] )
p6eval pugs: OUTPUT«*** ␤ Unexpected "["␤ expecting bare or pointy block construct, ":", identifier or operator␤ at /tmp/iqZaP6n3uY line 1, column 5␤»
wayland76 rakudo: say [X~] ( [1,2,3], [4,5,6], [7,8,9] )
p6eval rakudo ddb64e: OUTPUT«Statement not terminated properly at line 1, near "~] ( [1,2,"␤␤current instr.: 'parrot;PGE;Util;die' pc 129 (runtime/parrot/library/PGE/Util.pir:85)␤»
eternaleye Rakudo parsed (and ran) it some months ago, but not anymore
Ooh, that gives me an idea 05:43
Does SVN do bisect?
(It was before leaving the nest that it worked)
wayland76 rakudo: say [X~] ( [1,2,3], [4,5,6], [7,8,9] ); 05:44
p6eval rakudo ddb64e: OUTPUT«Statement not terminated properly at line 1, near "~] ( [1,2,"␤␤current instr.: 'parrot;PGE;Util;die' pc 129 (runtime/parrot/library/PGE/Util.pir:85)␤»
wayland76 rakudo: say X~ ( [1,2,3], [4,5,6], [7,8,9] );
p6eval rakudo ddb64e: OUTPUT«Could not find non-existent sub X␤current instr.: '_block14' pc 53 (EVAL_16:37)␤»
wayland76 rakudo: say [~] ( [1,2,3], [4,5,6], [7,8,9] );
p6eval rakudo ddb64e: OUTPUT«1 2 34 5 67 8 9␤»
eternaleye Hm, svn-- 05:45
Well, there's always a manual binary search
05:48 kimtaro joined
eternaleye Hm, seems [X] worked as recently as september, at least ( moritz++ #[ irclog.perlgeek.de ] ) 05:57
rakudo: say [X] ( [1,2,3], [4,5,6], [7,8,9] )
p6eval rakudo ddb64e: OUTPUT«Statement not terminated properly at line 1, near "( [1,2,3],"␤␤current instr.: 'parrot;PGE;Util;die' pc 129 (runtime/parrot/library/PGE/Util.pir:85)␤»
06:00 Kisu left 06:03 azawawi joined
eternaleye Oh wait. eternaleye-- # Braino. When I used [X] N months ago, it was with p6eval's pugs evaluator, not rakudo. 06:10
06:13 alanhaggai_ joined 06:17 alanhaggai left, alanhaggai_ is now known as alanhaggai 06:21 cspencer left
wayland76 ah, that would do it :) 06:23
azawawi hi 06:32
any blog posts on NPW '09 hackathon? 06:33
06:45 ejs joined 06:48 fridim_ joined
arnsholt What's the difference between <something> and <.something> (in regexes)? 06:48
moritz_ eternaleye: I think the spec has beeen changed recently 06:49
arnsholt: <.something> doesn't capture in $<something>
just like the difference between (...) and (?:...) in Perl 5
06:49 eternaleye left
arnsholt Not at all what I was wondering if it could be. Ta muchly 06:51
06:51 eternaleye joined 06:53 iblechbot joined 06:56 rblasch joined
arnsholt Hmm. 07:15
rakudo: grammar G { rule a { foo } }; if "foo" ~~ /<G::a>/ {say "OK"} 07:16
p6eval rakudo ddb64e: OUTPUT«OK␤»
arnsholt That works. But if I wrap it in a class:
rakudo: class A { grammar G { rule a { foo } }; method b { if "foo" ~~ /<G::a>/ {say "OK"} } }; (my A $x .= new).b;
p6eval rakudo ddb64e: OUTPUT«Null PMC access in get_string()␤current instr.: 'parrot;PGE;Match;new' pc 196 (compilers/pge/PGE/Match.pir:130)␤»
arnsholt It errors out. Is that supposed to happen?
moritz_ arnsholt: surely not like this, a "Null PMC access" is always a bug (or not-yet-implemented) in Rakudo 07:18
arnsholt: care to open a ticket?
arnsholt Will do
Huh. Looks like it's some kind of weirdness attached with it happening in a method call 07:20
moritz_ maybe we have a ticket for that already... 07:22
bah, rt.perl.org is down :/ 07:24
feel free to submit anway, we can merge the tickets later on if we find that they're duplicates
arnsholt Actually, I just found something 07:26
rakudo: class A { grammar G { rule a { foo } }; method b { if "foo" ~~ /<A::G::a>/ { say "OK" } } }; (my A $x .= new).b
p6eval rakudo ddb64e: OUTPUT«OK␤»
arnsholt Looks like the path to the rule has to be given the full path 07:27
moritz_ hm
don't know how it's supposed to be
it's the same in Perl 5
but then Perl 5 doesn't nest packages, notionally
07:29 azawawi left
arnsholt I think it might be related to something that puzzled me with the interactive interpreter: grammars seem to be retained between lines, so that I get a type redeclaration error if I use the same grammar name in two consecutive lines 07:29
And look at this:
rakudo: class A { grammar B { rule a { foo } } }; class Q { grammar B { rule a { bar } } };
p6eval rakudo ddb64e: OUTPUT«Re-declaration of type B at line 1, near "};"␤␤current instr.: 'parrot;PGE;Util;die' pc 129 (runtime/parrot/library/PGE/Util.pir:85)␤»
07:30 [particle]1 left
arnsholt Looks like grammars are stored differently from classes (and without all the namespace info) 07:30
07:30 [particle]1 joined
moritz_ I'm pretty sure that's a bug 07:31
(and a new one)
arnsholt Righties. In that case I'll submit it
And, with even more testing, it looks like it's a problem with classes as well. 07:36
rakudo: class A { class B {} }; class C { class B {} }
p6eval rakudo ddb64e: OUTPUT«Re-declaration of type B at line 1, near "}"␤␤current instr.: 'parrot;PGE;Util;die' pc 129 (runtime/parrot/library/PGE/Util.pir:85)␤» 07:37
07:38 kane_ joined
eternaleye arnsholt: Multi declarations are retained between lines too, so if you do a one-liner defining and using a multi, and then repeat it, you get an ambiguous dispatch error since they have the same signature. 07:38
arnsholt eternaleye: Yeah, I was getting to that. 'Cept I noticed it with grammars being retained, so giving the grammar again in the next line would give me a redefinition error 07:39
07:41 DemoFreak joined
arnsholt moritz_: rt.perl.org is back. And it looks like rakudobug@ has gotten some spam 07:48
moritz_ arnsholt: yes, but I don't have privs to delete tickets
and I don't want to reject them, because that generates reply mails (and thus more spam, potentially) 07:49
07:50 clkao left, hcchien_ joined, hcchien left 07:52 clkao joined 07:58 aff joined 07:59 clkao left 08:00 hcchien_ left, clkao joined 08:01 kimtaro_ joined 08:02 masak joined
masak greetings, autothreading camels. 08:03
08:03 hcchien joined 08:05 pmichaud joined, rewt joined, Helios joined, ingy joined, lucs joined, allbery_b joined, frobnitz joined, irc.freenode.net sets mode: +o pmichaud
frettled tests again on behalf of wayland76: 08:08
masak: label: for 1..2 { 1; }
masak frettled: looks legit to me. 08:09
08:09 amoc joined
masak but I'd suggest asking std. 08:09
std: label: for 1..2 { 1; }
p6eval std 26367: OUTPUT«ok 00:02 35m␤»
frettled oh, he did, but he wanted to know what the masak compiler said.
masak I wouldn't trust the masak compiler if I were you.
it's been known to be unreliable. 08:10
frettled SEP :)
masak if you think Rakudo and STD has been changing around a lot...
08:13 xinming joined, orafu left, orafu joined 08:18 kimtaro left 08:22 zamolxes joined, b_jonas joined
masak s/has/have/ # grammar fail 08:55
08:56 rblasch left
Matt-W Morning 08:58
masak Matt-W: a fine one at that, sir.
Matt-W indeed 09:00
my last day at work before I go on holiday
I'll be taking my laptop, but probably won't get any Perl 6 done
masak awww.
frettled masak: well, it could have been: if you (think Rakudo) and (STD has been ...)
masak frettled++ 09:01
frettled: I should carry you around in a handbag, ready to create such reasons after-the-fact for me.
jnthn pmichaud++ # release :-) 09:05
masak pmichaud++ 09:07
frettled masak: it would have to be a handbag with wheels and an internet connection
jnthn I quite like the choice of PM group too. ;-)
Matt-W masak: Well I won't have an internet connection... so I won't be able to come asking for help when it breaks
masak frettled: that could be arranged.
Matt-W I'm more likely to write
masak Matt-W: isolation can be a good thing for coding. 09:08
frettled pmichaud++
09:08 bacek_ left
frettled (I definitively think we need more pmichauds) 09:08
Matt-W masak: not when you need bugfixes to the compiler :) 09:09
I'll have to get a local copy of the spec and just do what I can
masak aye.
b_jonas reads "I'll be taking my laptop, but probably won't get Perl 6 done" 09:10
masak b_jonas: that's because he won't be gone till Christmas. :)
b_jonas masak: lol, yes
masak Matt-W: you'll be back before Christmas, won't you?
jnthn
.oO( yeah, but which one? ) ;-)
 09:11
b_jonas generalized Christmas is just five weeks away
Matt-W yes I'll be back on tuesday 09:13
which is definitely before christmas
unless jnthn isn't telling us something
b_jonas I count the week between the first and second weeks of exam term as christmas 09:14
only there's no such week in the spring, the first and second weeks of exams are adjacent
Matt-W Aaah exams 09:15
I remember those
b_jonas remember in this way xkcd.com/557/ 09:16
Matt-W Don't have to take ten all in a row anymore :)
b_jonas or as something _others_ have
I never had to take ten all in a row
Matt-W ooooh I have those dreams
b_jonas I'm not in such a stupid university where people take exams for the sake of taking exams
Matt-W usually when I have an exam coming up
frettled I haven't had those dreams in years.
Matt-W end of sixth form I had... twelve exams in two weeks, I think it was 09:17
that was fun...
b_jonas in fact I hardly have exams now
Matt-W I do them one at a time these days 09:18
b_jonas but the six exam _weeks_ still are there
Matt-W so you get to sit back and enjoy the discomfort of the people taking more exam-heavy subjects?
b_jonas being a graduate student I also enjoy taking exams that I know I wouldn't have liked to take as an undergraduate 09:19
it's a really great feeling
I don't take thigs so seriously anymore
because it's not my degree on stake
Matt-W :)
Yes, I found my perception of the world changed when I was a graduate student
Lots of things didn't seem anywhere near as vital anymore 09:20
b_jonas well I have to admit I've also started to change in the last few years of being an undergraduate, I just decided to worry less about exams and homework and stuff and don't stress about failing stuff, and then I just worried less; 09:21
but now it's even better and I know being a graduate student causes it
(there are also downsides though)
09:22 sitaram left
Matt-W always downsides :( 09:30
09:36 alanhaggai left, alanhaggai joined 09:38 NoirSoldats left 09:49 mikehh left 09:50 rblasch joined 09:57 orafu left 10:01 mjk joined 10:02 orafu joined 10:03 orafu left 10:20 wollmers joined
arnsholt When's a good time to talk to pmichaud? 10:20
10:22 mhsparks joined 10:26 ispy_ joined 10:41 ispy_ left 10:44 sephee left 10:55 jferrero joined
mjk why perl6 isn't execute? cygwin 11:00
11:04 payload left
b_jonas yes 11:05
11:06 araujo left 11:10 azawawi joined
azawawi good evening... 11:10
arnsholt Afternoon.
frettled time()
11:13 ispy_ joined, mjk left
wayland76 arnsholt: pmichaud often shows up within the next hour or two, but I suspect he might've had a late night or something 11:14
@seen pmichaud 11:15
lambdabot pmichaud is in #perl6. I don't know when pmichaud last spoke.
arnsholt wayland76: Cheers. I've poked around a bit in the regex stuff, and should probably have a word with him
wayland76 I saw him at 15:22, and the clock that said that now says 21:15 11:16
arnsholt Thanks. 11:17
azawawi where i can find talks/blog posts about what happened in hackathon NPW '09? 11:18
arnsholt Well there's the official announcment of Iron Man blogging contest, which was announced during a lightning talk at NPW 11:19
I don't know of anything else though. Check the blogs of the speakers perhaps?
azawawi arnsholt: thanks
wayland76 I don't know about elsewhere, but in Australia, the Iron Man competition is a triathlon that involves swimming through the surf 11:22
arnsholt Yeah. It's an endurance blogging contest. Hence the name =)
11:22 davidad left
wayland76 But we can go one better. George Bush declared our (ex) Prime Minister "The Man of Steel" :) 11:23
11:25 payload joined 11:26 aff left 11:29 b_jonas left
frettled azawawi: try also www.perlworkshop.no/npw2009/ 11:29
azawawi: I'm not sure how many of the talks have their presentations up yet. 11:30
azawawi frettled: i have already been there. I have not found any talk slides/multimedia so far. Thanks :) 11:31
jnthn I didn't get around to putting mine up yet...will do soonish 11:32
wayland76 azawawi: The IRC logs also contain info on this topic :)
frettled wayland76: ehvil
wayland76 Well, it's true. Most of the stuff I know about NPW came from there. 11:34
azawawi wayland76: yeah but it is strange that no one blogged about it until now 11:35
wayland76: what happened there... what they did... etc 11:36
frettled azawawi: www.perlworkshop.no/npw2009/talk/1732 - there's a link to the slides for that talk, at least.
azawawi frettled: thanks. Now that's cool :) 11:38
frettled azawawi: all talks are still in the schedule (www.perlworkshop.no/npw2009/schedule), but far from all talks have their slides on the web. I'm not going to point fingers at anyone, since I don't know who to blame. :) 11:40
Hmm. talkhub.org is not registered, perhaps I should create a web page for uploading talks on various technical topics. 11:43
But that sounds like _work_.
11:48 nbrown04 joined, nbrown04 left 11:51 jedai left 11:52 alester left
wayland76 Was cruising an APL group, and found this: www.craigmurphy.com/blog/?p=1417#comment-66863 11:55
Oops... www.craigmurphy.com/blog/?p=1417 11:56
Does anyone want to try to beat the APL solution for brevity? :)
gfldex is IO::Socket::recv() buffered?
wayland76 According to the P6 Spec, no 11:57
S32 IO.pod -- IO::Readable 11:58
gfldex seams not to be implemented 12:07
wayland76 Quite possibly 12:09
I'm under the impression that Socket stuff is only partly implemented
bacek will know if he's around
masak wayland76: perl6 -e 'my $n=@*ARGS[0];for "A"..$n,("A"..^$n).reverse {say " "x(ord($n)-ord($_)),$_," "x (2*(ord($_)-65)-1),($_ eq "A"??""!!$_)}' E 12:10
that works.
let the golfing begin.
wayland76: mberends++ and I implemented the sockets stuff. I'm sure there are things missing. but the kopipasta.pl script in Web.pm uses them for building a webapp, so _something_ works. 12:11
bacek I'm not around but it's buffered 12:12
masak turns out I could remove a lot of spaces.
perl6 -e 'my$n=@*ARGS[0];for"A"..$n,("A"..^$n).reverse {say " "x(ord($n)-ord($_)),$_," "x(2*(ord($_)-65)-1),($_ eq"A"??""!!$_)}' E
wollmers rakudo: say "c\[LINE FEED]".ord; 12:13
p6eval rakudo 3a5f61: OUTPUT«99␤» 12:14
bacek masak: my $o=&ord;
masak wollmers: \c
bacek: thanks.
wollmers rakudo: say "\c[LINE FEED]".ord;
p6eval rakudo 3a5f61: OUTPUT«perl6regex parse error: Unrecognized character name LINE FEED at offset 8, found 'L'␤current instr.: 'parrot;PGE;Perl6Regex;parse_error' pc 10792 (compilers/pge/PGE/Perl6Regex.pir:1367)␤»
wollmers rakudo: say "\c[LINE FEED (LF)]".ord;
p6eval rakudo 3a5f61: OUTPUT«10␤»
12:16 alanhaggai left
masak bacek: I didn't manage to make it shorter with 'my&o=&ord;'. 12:16
moritz_ rakudo: my &o := &ord; say o('a') 12:17
p6eval rakudo 3a5f61: OUTPUT«97␤»
moritz_ rakudo: my &o = &ord; say o('a')
p6eval rakudo 3a5f61: OUTPUT«97␤»
bacek rakudo: my&o=&ord;say o('a') 12:18
p6eval rakudo 3a5f61: OUTPUT«97␤»
bacek no way. It's longer 12:19
masak still much longer than the APL solution...
12:19 ejs1 joined
moritz_ the need to declare variables is, of course, a real killer for golfing 12:20
perl6 -e 'my$n=@*ARGS[0];for"A"..$n,("A"..^$n).reverse {say " "x(ord($n)-ord($_)),$_," "x 2*ord($_)-131,($_ eq"A"??""!!$_)}' E 12:22
a bit shorter
the parenthesis aroudn the ternary aren't required either
masak nice.
getting somewhere.
moritz_ and '$n.ord ' is shorter than ord($n) 12:23
ord($_) is .ord
masak right.
moritz_ perl6 -e 'my$n=@*ARGS[0];for"A"..$n,("A"..^$n).reverse {say " "x($n.ord-.ord),$_," "x 2*.ord-131,$_ eq"A"??""!!$_}' E
12:24 payload left, kimtaro_ left
moritz_ perl6 -e 'my$n=@*ARGS[0];@_="A"..$n;for@_,@_.reverse {say " "x($n.ord-.ord),$_," "x 2*.ord-131,$_ eq"A"??""!!$_}' E 12:25
not shorter
bacek rakudo: my $x=ord('C')-ord('A'); say sprintf('%10s', 'C') 12:26
moritz_ and wrong :/
p6eval rakudo 3a5f61: OUTPUT« C␤»
bacek rakudo: my $x=ord('C')-ord('A'); say sprintf('%10s', 'C'~' 'x$x)
p6eval rakudo 3a5f61: OUTPUT« C ␤»
moritz_ perl6 -e 'my$n=@*ARGS[0];for"A"..$n,("A"..^$n).reverse {say " "x $n.ord-.ord,$_," "x 2*.ord-131,$_~~"A"??""!!$_}' E
bacek rakudo: my $x=ord('C')-ord('A'); my$y=sprintf('%10s', 'C'~' 'x$x); say $y~$y.flip
p6eval rakudo 3a5f61: OUTPUT« C C ␤»
masak use .fmt! 12:27
bacek O!
moritz_ $_ eq"A" is longer than $_~~"A" because it requires one more whitespace
12:28 ejs left
bacek rakudo: my $x=ord('C')-ord('A'); my$y=('C'~' 'x$x).fmt('%10s'); say $y~$y.flip 12:28
p6eval rakudo 3a5f61: OUTPUT« C C ␤»
bacek rakudo: for'A'..'C',{my$x=ord($_)-65; ('C'~' 'x$x).fmt('%10s').map: {$_~$_.flip}.say} 12:30
p6eval rakudo 3a5f61: OUTPUT«Statement not terminated properly at line 1, near "'..'C',{my"␤␤current instr.: 'parrot;PGE;Util;die' pc 129 (runtime/parrot/library/PGE/Util.pir:85)␤»
moritz_ wouldn't it be shorter to iterate over the .ords directly?
bacek rakudo: for'A'..'C'{my$x=ord($_)-65; ('C'~' 'x$x).fmt('%10s').map: {$_~$_.flip}.say}
p6eval rakudo 3a5f61: OUTPUT«_block45␤Parameter type check failed for expr in call to map␤current instr.: 'die' pc 17498 (src/builtins/control.pir:225)␤»
bacek what???
rakudo: say for'A'..'C'{my$x=ord($_)-65; map ('C'~' 'x$x).fmt('%10s'){$_~$_.flip}} 12:31
p6eval rakudo 3a5f61: OUTPUT«say requires an argument at line 1, near "for'A'..'C"␤␤current instr.: 'parrot;PGE;Util;die' pc 129 (runtime/parrot/library/PGE/Util.pir:85)␤»
bacek rakudo: say $_ for'A'..'C'{my$x=ord($_)-65; map ('C'~' 'x$x).fmt('%10s'){$_~$_.flip}}
p6eval rakudo 3a5f61: OUTPUT«Statement not terminated properly at line 1, near "{my$x=ord("␤␤current instr.: 'parrot;PGE;Util;die' pc 129 (runtime/parrot/library/PGE/Util.pir:85)␤»
wayland76 my($in) = 'E'; for 65..ord($in) { say; }
bacek rakudo: for'A'..'C'{my$x=ord($_)-65; say map ('C'~' 'x$x).fmt('%10s'){$_~$_.flip}} 12:32
p6eval rakudo 3a5f61: OUTPUT«Method 'postcircumfix:{ }' not found for invocant of class 'Str'␤current instr.: 'postcircumfix:{ }' pc 5649 (src/classes/Associative.pir:133)␤»
wayland76 rakudo: my($in) = 'E'; for 65..ord($in) { say; }
p6eval rakudo 3a5f61: OUTPUT«say requires an argument at line 1, near "; }"␤␤current instr.: 'parrot;PGE;Util;die' pc 129 (runtime/parrot/library/PGE/Util.pir:85)␤»
wayland76 rakudo: my($in) = 'E'; for 65..ord($in) { say $_; }
p6eval rakudo 3a5f61: OUTPUT«65␤66␤67␤68␤69␤»
masak wayland76: .say
wayland76 rakudo: my($in) = 'E'; for 65..ord($in) { .say; }
bacek rakudo: for'A'..'C'{my$x=ord($_)-65; say map{$_~$x.flip}('C'~' 'x$x).fmt('%10s')}
p6eval rakudo 3a5f61: OUTPUT«65␤66␤67␤68␤69␤»
rakudo 3a5f61: OUTPUT«No applicable candidates found to dispatch to for 'map'␤current instr.: '_block27' pc 241 (EVAL_20:104)␤»
bacek rakudo: for'A'..'C'{my$x=ord($_)-65; say map{$_~$x.flip},('C'~' 'x$x).fmt('%10s')} 12:35
p6eval rakudo 3a5f61: OUTPUT«No applicable candidates found to dispatch to for 'map'␤current instr.: '_block27' pc 241 (EVAL_20:104)␤»
bacek rakudo: for'A'..'C'{my$x=ord($_)-65; say map{$_~$_.flip},('C'~' 'x$x).fmt('%10s')}
p6eval rakudo 3a5f61: OUTPUT«No applicable candidates found to dispatch to for 'map'␤current instr.: '_block27' pc 241 (EVAL_20:104)␤»
wayland76 rakudo: my($in) = 'E'; say join "\n", map { .chr } 65..ord($in);
p6eval rakudo 3a5f61: OUTPUT«Statement not terminated properly at line 1, near "65..ord($i"␤␤current instr.: 'parrot;PGE;Util;die' pc 129 (runtime/parrot/library/PGE/Util.pir:85)␤»
wayland76 rakudo: my($in) = 'E'; say join "\n", map { .chr _ ' ' xx $_ _ .chr()} 65..ord($in); 12:36
moritz_ wayland76: comma after }
p6eval rakudo 3a5f61: OUTPUT«Statement not terminated properly at line 1, near "_ ' ' xx $"␤␤current instr.: 'parrot;PGE;Util;die' pc 129 (runtime/parrot/library/PGE/Util.pir:85)␤»
wayland76 rakudo: my($in) = 'E'; say join "\n", map { .chr _ ' ' xx $_ _ .chr()}, 65..ord($in);
p6eval rakudo 3a5f61: OUTPUT«Statement not terminated properly at line 1, near "_ ' ' xx $"␤␤current instr.: 'parrot;PGE;Util;die' pc 129 (runtime/parrot/library/PGE/Util.pir:85)␤»
wayland76 moritz_: Thanks :). I still don't have my working Rakudo RPM yet, so this golfing is my only chance to do P6 :) 12:37
masak bacek: the _ operator is ~ nowadays.
moritz_ what is $_ _ supposed to mean?
wayland76 rakudo: my($in) = 'E'; say join "\n", map { .chr ~ ' ' xx $_ ~ .chr()}, 65..ord($in);
p6eval rakudo 3a5f61: OUTPUT«A A␤B B␤C
.. ...
wayland76 rakudo: my($in) = 'E'; say join "\n", map { .chr ~ (' ' xx $_) ~ .chr }, 65..ord($in); 12:38
p6eval rakudo 3a5f61: OUTPUT«A A␤B B␤C
.. ...
12:38 ejs1 left
wayland76 rakudo: my($in) = 'E'; say join "\n", map { .chr ~ (' ' xx $_-65) ~ .chr }, 65..ord($in); 12:39
p6eval rakudo 3a5f61: OUTPUT«AA␤B B␤C C␤D D␤E E␤»
wayland76 rakudo: my($in) = 'E'; say join "\n", map { .chr ~ (' ' xx $_-66) ~ .chr }, 65..ord($in);
p6eval rakudo 3a5f61: OUTPUT«AA␤BB␤C C␤D D␤E E␤»
12:40 LylePerl joined, broquaint joined
bacek std: for'A'..'C'{for($_,$_.reverse){my$x=ord($_)-65; for ('C'~' 'x$x).fmt('%10s') {say $_~$_.flip}}} 12:42
p6eval std 26367: OUTPUT«##### PARSE FAILED #####␤Syntax error (two terms in a row?) at /tmp/7JvZ3y175s line 1:␤------> for'A'..'C'{for($_,$_.reverse){my$x=ord($_)-6␤ expecting any of:␤ POST␤ argument list␤ infix or meta-infix␤ infix stopper␤ postfix␤
..postfix_prefix_meta_operator␤ standa...
masak bacek: .flip 12:44
bacek rakudo: say "foo".flip
p6eval rakudo 3a5f61: OUTPUT«oof␤»
bacek time to update local copy...
12:45 abra joined
wayland76 rakudo: my($in) = 'E'; @a = map { .chr ~ (' ' xx $_-66) ~ .chr }, 66..ord($in); $b= 'A' . join"\n",@a[0..@a-1]; say $b ~ @a.last ~ $b.flip 12:47
p6eval rakudo 3a5f61: OUTPUT«Statement not terminated properly at line 1, near ". join\"\\n\""␤␤current instr.: 'parrot;PGE;Util;die' pc 129 (runtime/parrot/library/PGE/Util.pir:85)␤»
wayland76 rakudo: my($in) = 'E'; @a = map { .chr ~ (' ' xx $_-66) ~ .chr }, 66..ord($in); $b= 'A' . join"\n",@a[0..@a-1]; say $b ~ @a.pop ~ $b.flip 12:48
p6eval rakudo 3a5f61: OUTPUT«Statement not terminated properly at line 1, near ". join\"\\n\""␤␤current instr.: 'parrot;PGE;Util;die' pc 129 (runtime/parrot/library/PGE/Util.pir:85)␤»
wayland76 rakudo: my($in) = 'E'; @a = map { .chr ~ (' ' xx $_-66) ~ .chr }, 66..ord($in); $b= 'A' ~ join "\n",@a[0..@a-1]; say $b ~ @a.pop ~ $b.flip
p6eval rakudo 3a5f61: OUTPUT«Scope not found for PAST::Var '@a' in ␤current instr.: 'parrot;PCT;HLLCompiler;panic' pc 146 (src/PCT/HLLCompiler.pir:104)␤»
wayland76 rakudo: my($in) = 'E'; my @a = map { .chr ~ (' ' xx $_-66) ~ .chr }, 66..ord($in); $b= 'A' ~ join "\n",@a[0..@a-1]; say $b ~ @a.pop ~ $b.flip
p6eval rakudo 3a5f61: OUTPUT«Scope not found for PAST::Var '$b' in ␤current instr.: 'parrot;PCT;HLLCompiler;panic' pc 146 (src/PCT/HLLCompiler.pir:104)␤»
wayland76 rakudo: my($in) = 'E'; my @a = map { .chr ~ (' ' xx $_-66) ~ .chr }, 66..ord($in); my $b= 'A' ~ join "\n",@a[0..@a-1]; say $b ~ @a.pop ~ $b.flip
p6eval rakudo 3a5f61: OUTPUT«ABB␤C C␤D D␤E EE EE E␤D D␤C C␤BBA␤»
bacek rakudo: use APL::Parser; say {{{⍵⍪1 0↓⊖⍵}⍵,0 ¯1↓1⌽⌽⍵}↑(⎕a⍳⍵){(⍳⍺)⌽(⍺,⍺)↑(⍺,1)⍴⍵}⎕a}’E’ 12:49
oh wait
p6eval rakudo 3a5f61: OUTPUT«Can't find ./APL/Parser in @INC␤current instr.: 'die' pc 17498 (src/builtins/control.pir:225)␤»
wayland76 rakudo: my($in) = 'E'; my @a = map { .chr ~ (' ' xx $_-66) ~ .chr }, 66..ord($in); my $b= 'A' ~ join "\n",@a[0..@a.end-1]; say $b ~ @a.pop ~ $b.flip 12:50
p6eval rakudo 3a5f61: OUTPUT«ABB␤C C␤D DE ED D␤C C␤BBA␤»
wayland76 rakudo: my($in) = 'E'; my @a = map { .chr ~ (' ' xx $_-66) ~ .chr }, 66..ord($in); my $b= 'A' ~ join "\n",@a[0..@a.end-1],"\n"; say $b ~ @a.pop ~ $b.flip 12:51
p6eval rakudo 3a5f61: OUTPUT«ABB␤C C␤D D␤␤E E␤␤D D␤C C␤BBA␤»
wayland76 rakudo: my($in) = 'E'; my @a = map { .chr ~ (' ' xx $_-66) ~ .chr }, 66..ord($in); my $b= 'A' ~ join "\n",@a[0..@a.end-1],""; say $b ~ @a.pop ~ $b.flip
p6eval rakudo 3a5f61: OUTPUT«ABB␤C C␤D D␤E E␤D D␤C C␤BBA␤»
bacek wayland76: s/ //g
wayland76 rakudo: my($in) = 'E'; my @a = map { .chr ~ (' ' xx $_-66) ~ .chr }, 66..ord($in); my $b= join "\n",'A',@a[0..@a.end-1],""; say $b ~ @a.pop ~ $b.flip 12:52
p6eval rakudo 3a5f61: OUTPUT«A␤BB␤C C␤D D␤E E␤D D␤C C␤BB␤A␤»
wayland76 Yeah, I know I can remove spaces. But I still haven't gotten it to put them all in yet :)
12:52 payload joined 12:53 alester joined, alester left
wayland76 rakudo: my($in) = 'E'; my @a = map {' ' xx ord($in)-$_ ~ .chr ~ (' ' xx $_-66) ~ .chr }, 66..ord($in); my $b= join "\n",'A',@a[0..@a.end-1],""; say $b ~ @a.pop ~ $b.flip 12:53
p6eval rakudo 3a5f61: OUTPUT«A␤ BB␤ C C␤ D D␤E E␤D D ␤C C ␤BB ␤A␤»
wayland76 rakudo: my($in) = 'E'; my @a = map { .chr ~ (' ' xx $_-66) ~ .chr }, 66..ord($in); my $b= join "\n",map{' ' xx ord($in)-$_ ~ $_ }'A',@a[0..@a.end-1],""; say $b ~ @a.pop ~ $b.flip 12:55
p6eval rakudo 3a5f61: OUTPUT«Statement not terminated properly at line 1, near "'A',@a[0.."␤␤current instr.: 'parrot;PGE;Util;die' pc 129 (runtime/parrot/library/PGE/Util.pir:85)␤»
wayland76 rakudo: my($in) = 'E'; my @a = map { .chr ~ (' ' xx $_-66) ~ .chr }, 66..ord($in); my $b= join "\n",map{' ' xx ord($in)-$_ ~ $_ }, 'A',@a[0..@a.end-1],""; say $b ~ @a.pop ~ $b.flip
p6eval rakudo 3a5f61: OUTPUT«No applicable candidates found to dispatch to for 'map'␤current instr.: '_block14' pc 161 (EVAL_19:66)␤»
12:55 jferrero left
wayland76 Oh well, I guess I'll stop filling up the channel now. :) 12:56
LylePerl rakudo: chdir() 12:57
p6eval rakudo 3a5f61: OUTPUT«Could not find non-existent sub chdir␤current instr.: '_block14' pc 53 (EVAL_16:37)␤»
wayland76 APL FTW, I guess :) 13:00
masak there will be modules... 13:01
"your technological distinctiveness will be added to our own." 13:03
frettled this ought to be really simple with TECO or VI ;)
wayland76 As bacek pointed out ... APL::Parser :)
13:05 awwaiid joined
frettled TECO::Parser! 13:07
13:07 maja joined
wayland76 Now there's something to look forward to :) 13:08
moritz_ rakudo: say 'no netsplit'
masak so, not no netsplit. :/
rakudo Sorry, netsplit not found!
wayland76 :)
moritz_ actually it's a network outage, not a split 13:09
wayland76 Well, if there's anything on the other side of the outage, then it's a split :)
frettled wayland76: even better, how about implementing Perl 6 in TECO? :D 13:10
wayland76 Or does there have to be an IRC server on the other side of the outage? Yes. Am I wrong again? Yes :)
frettled: Feel free :)
frettled wayland76: I'd like to keep what's left of my sanity and NOT turn into RMS, thankyouverymuch. 13:11
wayland76 I thought that was if you implemented P6 in elisp 13:13
13:16 p6eval left 13:19 maja_ left
pmichaud good morning. 13:19
pmichaud notices lots of really bizarre code in his scrollback window...
masak tips hat
it... got a little golfy in here.
pmichaud masak: did you want us to use "Stockholm" as a release name? If yes, which month (except June -- it's already taken)? 13:21
wayland76 It's my fault. Sorry
moritz_ no need to apologize 13:22
masak pmichaud: I like Stockholm.pm, but I would like them do something for Perl 6 before they get a release named after them.
pmichaud: I can email their list if you want.
wayland76 moritz_: It's easier to apologise before people get upset than afterwards :).
masak pmichaud: with Vienna, Oslo and Bratislava, all these had already done something for Perl 6/Rakudo.
wayland76 Has any other .pm group done anything for P6? 13:23
pmichaud masak: that's fine; you had mentioned it at the hackathon and your contributions count as "things done for Perl 6/Rakudo"
wayland76: Pittsburgh has a Parrot/Perl 6 workshop planned
masak pmichaud: oh.
wayland76 Oh, ok :)
moritz_ what's the deal with docs/STATUS? it seems a bit outdated and a bit low on To do items 13:24
pmichaud masak: but if you want to use the opportunity to prod others at Stockholm.pm to do something for p6, that's fine with me.
moritz_ should we remove it from the repo, and keep the page on rakudo.org updated instead?
frettled wayland76: RMS was a pretty darn good TECO programmer, and then he wrote some Editor MACroS for the TECO editor, which somehow evolved into everything, the kitchen sink and your local coffee machine.
masak pmichaud: I was thinking of a somewhat bigger scale. all my contributions are either small patches or massive complaining.
pmichaud masak: November isn't a "small patch". Nor is proto. Nor IO::Socket. Nor .... :-)
masak RT tickets are just formalized complaints. 13:25
moritz_ masak: and massive amounts of testing and bug reporting
masak gives up
moritz_ it's not only the things that are commited to Rakudo repo that count
pmichaud correct. It's things done to help Perl 6.
moritz_ (not to forget blogging)
masak ok, so what about next month, then? 13:26
wayland76 frettled: Ok, I see your point now :)
pmichaud masak: let's just say you have a weighted vote when it comes to selecting a possible release name :-)
May would be fine.
masak I still think Stockholm.pm should arrange something for the occasion.
pmichaud okay, let's wait for that then.
masak I'll email them and say something to that effect.
wayland76 ...and tell them how hard you had to work to win this concession from us... :) 13:27
pmichaud I'm not trying to push to get it as the next release (I'd like to see some non-European .pm's soon); just wanted to see if you were eager to have it listed.
frettled Phew, I answered correctly when TimToady asked if Oslo had city walls. (The answer was "no, Oslo never had any")
moritz_ that's pretty unusual, isn't it? 13:28
wayland76 Maybe someone could resuscitate the Dallas/Fort Worth .pm group :)
Not really -- Melbourne never had city walls :)
pmichaud moritz_: (STATUS) -- yes, it's really out of date. I'm in favor of removing it and we'll point people to rakudo.org .
wayland76: yeah, DFW.pm hasn't been all that active so that's why I haven't put it on the list yet. I'd probably pick Austin.pm before DFW.pm :-) 13:29
frettled moritz_: somewhat, but not very unusual way up north. Oslo lay between rivers.
wayland76 Well, do that, then :)
pmichaud today I'm planning to blog and work on ROADMAP.
wayland76 I just remembered that there were 3 P6 people in DFW 13:30
frettled Akershus fortress, however, was never successfully captured.
(en.wikipedia.org/wiki/Akershus_fortress)
13:30 alanhaggai joined
arnsholt pmichaud: You're the man behind the regex engine, no? 13:31
13:31 mjk joined
pmichaud arnsholt: for Parrot/Rakudo, yes. 13:31
arnsholt Yeah, that's what my memory rold me. A few days ago, I submitted a bug about Rakudo not recognising double quoted strings in regexes. I had a look see around the code today to see what I could find 13:33
mjk I put Rakudo from git under C:\cygwin\home\admin\rakudo(cygwin:/home/admin/rakudo), It compiled nicely. but it didn't do anything and just went back to the prompt 13:34
pmichaud Actually, I have a patch that was done at the hackathon for handling double-quoted strings.
just haven't had a chance to apply it yet. 13:35
mjk can anyone help me?
frettled so much happened at the hackathon that I expect it will be a couple of weeks before all the patches are in ;)
arnsholt Oh cool. In that case, my meanderings are pretty much moot. It did give me some more understanding of the code though
pmichaud mjk: what did you use to build Rakudo?
arnsholt++ # reviewing PGE code 13:36
mjk pmichaud: cygwin:gcc
cygwin on winxp
pmichaud arnsholt: if I can provide any guideposts, let me know. Much of PGE should be refactored soon, though, to bring it closer to spec and make a start on longest-token-matching.
moritz_ pmichaud: will LTM imply building of a DFA? 13:37
mjk it can create perl6.exe, but run is failed
and make test is failed also
pmichaud mjk: I'm a bit lost when it comes to cygwin and other things. Can you see if parrot runs, at least? Just change to the "parrot" subdirectory and type "make test"
arnsholt pmichaud: Thanks. I'll try to remember that
pmichaud moritz_: something like a DFA, probably. 13:38
frettled doesn't jnthn have parrot+rakudo working under Windows?
mjk pmichaud: i try it
13:40 exodist joined
moritz_ I think jnthn has "real" windows, not cygwin 13:40
13:40 FurnaceBoy joined
frettled ah 13:40
13:42 iblechbot left
moritz_ pmichaud: did you commit your Regex type fixes already? 13:43
rakudo: say #[ comment ] "foo" 13:45
arnsholt moritz_: That works with my local build of rakudo from this morning 13:46
13:47 payload left, alanhaggai_ joined
wayland76 Didn't LylePerl have experience on Windows? Or am I confused again? 13:48
pmichaud moritz_: they're being tested right now. Also, we're having to do some searching at the house for car keys... :-| afk for a bit 13:50
13:51 skids joined 13:52 pugs_svn joined 13:56 p6eval joined
mjk pmichaud: parrot "make test" Result: PASS 13:56
pmichaud: All tests successful. 13:57
pmichaud: Files=387, Tests=11646, 1056 wallclock secs ( 2.95 usr 2.17 sys + 388.99 cusr 235.04 csys = 629.15 CPU)
13:57 alanhaggai left 13:58 alanhaggai_ is now known as alanhaggai
pmichaud mjk: okay, now try (from the rakudo dir) parrot\parrot perl6.pbc 13:58
(or maybe it's parrot\parrot.exe perl6.pbc -- I can never remember with windows)
mjk pmichaud: i am running "make test" on rakudo
arnsholt Where can I find the camelia logo? I know I saw it on a page a few days ago, but I can't for the life of me remember where... 13:59
pmichaud arnsholt: svn.pugscode.org/pugs/misc 14:00
moritz_ arnsholt: the svg is in the pugs repo in misc/camelia.svg
masak pmichaud: people on the Stockholm list reacted positively. claes++ is pulling a bit on sponsors to try to recreate the Oslo hackathon success, pizza and all.
arnsholt Cheers!
pmichaud masak: oooh, that sounds awesome
if someone will let me know when it occurs, I can try to be online then. 14:01
mjk pmichaud: All tests successful.Files=29, Tests=236, 84 wallclock secs ( 0.03 usr 0.05 sys + 61.78 cusr 3.27 csys = 65.13 CPU)Result: PASS 14:02
pmichaud mjk: that's from... ?
mjk pmichaud: but perl6.exe isn't running 14:03
masak pmichaud: I'll let you know when I hear something more. which might be tomorrow, or weeks from now.
mjk $ perl6
admin@nb-mjk ~/rakudo
$ perl6 -v
admin@nb-mjk ~/rakudo
pmichaud mjk: I suspect a library loading issue somewhere.
i.e., the perl6.exe binary isn't able to dynamically load parrot or something like that.
mjk pmichaud: can you give me a suggestion? 14:04
moritz_ is there something like strace or ldd for cygwin?
pmichaud alas, I have zero experience with cygwin, much less understanding how its linkers work.
mjk: you might try posting to the [email@hidden.address] list. Maybe someone there can help. 14:06
14:07 kane__ joined, iblechbot joined
mjk pmichaud: OK! thank you 14:07
pmichaud: "make spectest" is failed on rakudo 14:08
pmichaud well, yes, if perl6.exe isn't running for you, then "make test" and "make spectest" are likely to fail.
14:09 alester joined
mjk pmichaud: "make test" is use perl5.10 14:12
14:13 semn2kdojinej left 14:14 c9s left
LylePerl mjk: Why not compile Rakudo natively on windows with MinGW32 rather than using cygwin? 14:21
mjk LylePerl: my pc installed cygwin, not installed MinGW32:) 14:22
LylePerl I've got a guide here:- www.perlfoundation.org/perl6/index....evelopment 14:23
It shows you how to get MinGW32, git, and how to build Rakudo
amoung other thigs
14:24 nemstep joined
LylePerl www.perlfoundation.org/perl6/index....c_compiler 14:24
14:24 kane_ left
mjk LylePerl: thanks, i'll try MinGW32 14:24
LylePerl pmichaud: Is there a binary Rakudo for Windows? If not maybe I should build and zip one up every week or something? 14:26
[particle] yes, there is
pmichaud there is? Oh.
patmat i can't get the actual .zip running in work, for rakudo
[particle] searches for the link... 14:27
pmichaud LylePerl: that said, building and zipping one up every week might be a good thing to have.
[particle] sourceforge.net/project/showfiles.p..._id=211372
eiro hello 14:28
[particle] hi, eiro
pmichaud oooh, the sourceforge.net site is interesting.
[particle] pmichaud: that's fperrad++'s doing
pmichaud impressive.
[particle] indeed 14:29
eiro if i want my lib to be usable in any parrot langage (not only perl6), can i still write it in perl6 (or do i hanve to concider PIR or NCI) ?
pmichaud eiro: we're still working on language interop. 14:30
[particle] the idea is that yes, you can write it in any language 14:31
pmichaud eiro: but the intent is that libraries written in (e.g., perl6) can be used by other languages without too much difficulty.
of course, the perl6-written-library would require that the perl 6 runtime be available.
[particle] for max portability Right Now, use nqp.
eiro well ... i start my lib now but it can wait for interop. ... so the answer completly satisfy me. thanks 14:33
14:33 mjk left 14:35 nihiliad joined 14:39 azawawi left
LylePerl Would be worth mentioning that sourceforge link on the "How to get Rakudo" page. 14:39
wollmers std: say "\cZ".ord 14:40
p6eval std 26367: OUTPUT«ok 00:04 35m␤»
wollmers rakudo: say "\cZ".ord
p6eval rakudo 816a4c: OUTPUT«26␤»
14:42 payload joined, antone left
jnthn masak: ping 14:44
14:44 jferrero joined 14:45 justatheory joined
masak jnthn: 乓 14:45
14:45 bsdperl joined, bsdperl left
jnthn masak: I'm pondering showing proto to my .pm group tonight. I already have a Rakudo install. Do I need to do anything specific to get proto to know where to put modules or find my Rakudo, etc? 14:46
wayland76 masak: That one came up as a box here :)
14:46 bsdperl joined
masak wayland76: it's Chinese for "pong". 14:46
14:46 bsdperl left
masak jnthn: just try it before you demo it. :) 14:46
jnthn: it works for me, but buyer beware, here be dragons, etc. 14:47
jnthn masak: I just tried
16:46 < masak> jnthn: just try it before you demo it. :)
oops
perl proto install SVG
and got
Downloading Perl 6...
Couldn't download Perl 6: 256 at proto line 156.
masak checks that line
wayland76 rakudo: proto install Christmas 14:48
p6eval rakudo 816a4c: OUTPUT«Malformed routine definition at line 1, near "install Ch"␤␤current instr.: 'parrot;PGE;Util;die' pc 129 (runtime/parrot/library/PGE/Util.pir:85)␤»
masak jnthn: you're on Windows, right?
jnthn: do you have wget?
jnthn masak: No
ah 14:49
but it's going to have other issues too
masak aye, many, probably.
jnthn 'env' is not recognized as an internal or external command,
operable program or batch file.
masak :/
patmat are the rumors about the Christmas release this year true?
masak patmat: no.
jnthn (That was after I edited proto.config)
patmat hehe
wayland76 patmat: Your guess is as good as ours
jnthn (to tell it where my Rakudo was)
masak patmat: but by Christmas this year, things will be pretty good, I guess. 14:50
jnthn: ok.
patmat :)
jnthn masak: OK, no worries, I don't ahve time to debug it etc now. Was just curious if it'd work out of the box.
[particle] perl 6 will definitely be out by christmas.
masak jnthn: it's tricky, I don't have Windows, and most of the time I forget that it exists. so I/we haven't written proto for Windows.
jnthn masak: Sure.
Makes sense. I wasn't hugely optimistic. 14:51
masak it could probably be done, but it'd take a dedicated developer who kept proto up-to-date.
patmat i wish i could get rakudo running on that fu*kin Windows machine here at work
wayland76 But as soon as HTTP::Daemon and %*ENV work, those two problems can be easily fixed
masak proto volunteers welcome.
jnthn patmat: Rakudo itself running on Windows can work. I build it on Windows just fine here.
masak wayland76: %*ENV works, to some degree.
jnthn With MS VC++ compiler.
wayland76 masak: Just making assumptions based on your running env :) 14:52
[particle] patmat: what toolchain are you using? msvc2008express works quite well
patmat ok
wayland76 Note that both bash and Windows support the "set" command
patmat should have the setup here at work lets see :)
masak wayland76: no, we're running env to provide other programs with the right environment, not Rakudo.
wayland76 Oh, ok
masak wayland76: and HTTP::Daemon is pretty functional too nowadays. native sockets, yay! 14:53
wayland76 So can you turf wget out of proto then?
Oh, wait, but then HTTP::Daemon is a dependency for proto, and that's bad :)
[particle] not if authorities are done right 14:54
masak aye.
wayland76 authorities? 14:56
What are those? 14:57
[particle] buubot: spack authority
buubot [particle]: S02-bits.pod:3 S11-modules.pod:5 S12-objects.pod:1 S22-package-format.pod:1
[particle] S11? 14:58
wayland76 Ah, ok
[particle] feh. what bot do i ask that, for a link?
oh, right, irclog
perlcabal.org/syn/S11.html
faster to use my fingers in firefox.
japhb First off: congrats guys on the Rakudo release! 14:59
[particle] senses a "but..."
;)
patmat lol
masak [particle]: how do authorities solve the fact that proto cannot assume that any other projects are installed?
japhb Second, how complete is the IO::Socket support? Can I reimplement "Network Programming with Perl" for Rakudo? 15:00
masak japhb: give it a go.
[particle] masak: proto can have it's own libraries, under its own authority
masak japhb: Web.pm already uses the sockets.
[particle]: ah, cunning.
masak wants those authorities
[particle] ...hopefully enough to code them. :)
wayland76 Can we questions the authorities? :) 15:01
japhb masak, so we've got listen(), bind(), etc., and all of TCP/UDP/RAW? What about IPv4 versus IPv6?
masak japhb: only TCP, AFAIK.
INET4.
patches welcome for the other things, as long as they keep to the spec. 15:02
japhb masak: gotcha 15:04
wayland76 We should make IPv6 the default :). 15:05
japhb wayland76: tell that to the ISPs. :-) 15:06
[particle] what's ipv6, is that from the future?
japhb [particle]: Given that it was IIRC only a couple years ago that the IETF decided to test whether they could hold a meeting using just IPv6, I'd say "Yes." 15:07
wayland76 IPv6 means we have 128-bit IP addresses 15:09
15:09 pmurias joined
wayland76 And if I understand correctly, it works on Linux and Windows, at the least 15:09
Also, I get the impression that, if you program using the IPv6 interface, you can still use IPv4 addresses, and have everything go via IPv4, but when you need to change to IPv6, just change the address, and it all happens 15:10
*if* the program used the IPv6 interface in the first place :)
Of course, my impression could be wrong :) 15:11
gfldex your program might talk to a nameserver
and that nameserver might talk to another nameserver 15:12
and they all have to talk ipv6
wayland76 gfldex: ??? I don't think so 15:13
Ah, yes, I see your point -- you're talking about AAAA records, right?
jnthn -> .pm group
wayland76 o/
15:15 Psyche^ joined 15:17 Patterner left, Psyche^ is now known as Patterner 15:22 araujo joined 15:28 rblasch left 15:30 kaether_ joined, kaether_ left 15:33 kaether left
[particle] finds a csv bnf grammar 15:33
15:35 ejs joined
wayland76 Hey, could we write a BNF to Perl6 converter? 15:35
PerlJam "we" could :)
[particle] yes, but there are very many different ebnf interpretations 15:36
wayland76 (well, ok, we could; more I just wanted to bring the thought to people's minds)
[particle] s/interpretations/syntaxes/
wayland76 [particle]: Good point. Thanks :)
PerlJam I've thought about it several times, but see [particle]
15:36 c9s joined
PerlJam But perhaps that's just lack of imagination to not figure a way to detect and adjust for the particular ebnf syntax 15:37
15:37 iblechbot left
[particle] an error-correcting parser hasn't really been written for parrot yet 15:37
what should a csv module be called in perl6-land? 15:38
15:38 exodist left
[particle] can't wait for the great module-naming battles to come 15:39
15:40 lambdabot joined
wayland76 Module, or parsing module? 15:40
DBD::CSV ? :)
pmichaud time for lunch here -- bbl. 15:41
[particle] reader/writer, not following the as-yet-undefined dbi driver spec
wayland76 Format::CSV maybe?
o/ to pm 15:42
PerlJam there will be no battles because there can be any number of people using the exactly same namespace.
s/ly// 15:43
(odd, I dropped an ly earlier and added one here)
15:43 exodist joined
wayland76 Oh, yes. use CSV:auth(particle) and use CSV:auth(PerlJam) 15:44
$o = CSV->new()
Now what does it do :)
PerlJam you get a compile-time error or two
(no my, you used -> when you meant ., and you didn't disambiguate the CSVs) 15:45
[particle]: I'd just put it in the CSV namespace for now. You can always change it later. 15:46
wayland76 I still reckon Format::CSV, but it's your module :)
[particle] idly wonders if there's prior art in pugs repo, while rakudo rebuilds... 15:47
[particle] notes his picture has been updated 16:02
16:03 iblechbot joined
pugs_svn r26368 | pmurias++ | [re-smop] fixed ref counting bug in s1p hash 16:05
moritz_ I've got about half an hour spare tuits now - anything in particular I should work on? 16:24
(like tests for a thing that you want to implement soon)
wollmers moritz: review of spectests, e.g. #?rakudo 3 skip '\c$char' in t/spec/S02-literals/quoting.t (PASS) 16:28
moritz: but I can do this systematically if you can manage commit access for me 16:29
moritz_ wollmers: I can ;-) just /msg me your email address and desired nick name 16:30
[particle] free! pugs commit bits. all you need is an email address and a dream.
moritz_ (or if you don't fear spam you can simply write it here in the open) 16:31
pugs_svn r26369 | moritz++ | [t/spec] test for RT #64918 (malformed UTF-8 string) 16:32
16:33 FurnaceBoy left
wollmers moritz: no secret, I always use real name Helmut Wollmersdorfer [email@hidden.address] and preferred short name (as nick) wollmers (the first 8 chars) 16:33
moritz_ wollmers: you should have got mail by now (two, actually ;-) 16:34
16:36 mhsparks left
wollmers moritz: got both - THX 16:36
moritz_ std: my $x; $x R~= 'foo'
p6eval std 26369: OUTPUT«##### PARSE FAILED #####␤Can't reverse a concatenation because it's too fiddly at /tmp/MPzfbt5CIU line 1:␤------> my $x; $x R~= 'foo'␤FAILED 00:02 35m␤»
moritz_ std: my $x; $x R~ 'foo' 16:37
p6eval std 26369: OUTPUT«ok 00:02 35m␤»
moritz_ rakudo: class A { has Int @.a is rw }; my $x=A.new; $x.a = (2, 3, 4); $x.a.push: 'foo'; say $x.a.perl 16:42
p6eval rakudo f0fab2: OUTPUT«[2, 3, 4, "foo"]␤»
16:46 masak left 16:49 jhorwitz joined
pugs_svn r26370 | moritz++ | [t/spec] test for RT #64474 16:51
16:57 zamolxes left 17:00 km2 joined
pugs_svn r26371 | moritz++ | [t/spec] tests for RT #64464, regexes with dashes and hyphens 17:01
moritz_ rakudo: my $x = Bool::False; say ++$x; 17:03
p6eval rakudo f0fab2: OUTPUT«1␤»
moritz_ rakudo: my $x = Bool::False; say $x.succ; 17:04
p6eval rakudo f0fab2: OUTPUT«Null PMC access in isa()␤current instr.: 'parrot;List;!flatten' pc 7679 (src/classes/List.pir:236)␤»
pugs_svn r26372 | moritz++ | [t/spec] tests for .succ/.pred on Bool 17:08
17:09 pmurias_ joined 17:11 payload left
skids ?nopaste 17:11
lambdabot Haskell pastebin: hpaste.org/new
skids hpaste.org/fastcgi/hpaste.fcgi/view?id=4138 17:16
17:22 pmurias left 17:29 PhatEddy joined
PhatEddy rakudo: my $x = slurp $*IN 17:30
p6eval rakudo f0fab2: OUTPUT«Unable to open filehandle from path 'IO<0xb5fcdfe0>'␤current instr.: 'open' pc 1235 (src/classes/Object.pir:259)␤»
PhatEddy It works the other way with $*IN.slurp 17:31
moritz_ looks like dispatch gone wrong 17:32
pmichaud According to S32, slurp as a function expects a filename.
multi slurp (Str $filename
Bool :$bin = False,
Str :$enc = "Unicode",
--> Str|Buf
)
moritz_ that's not very dwimmmy
PhatEddy with mmd I can make it work either way from setting and make slurp by itself slurp stdin ...
pmichaud feel free to fix the spec :-)
17:32 ruoso joined
moritz_ rakudo: use Test; plan 1; isa_ok(1|2, Junction) 17:36
p6eval rakudo f0fab2: ( no output ) 17:37
moritz_ rakudo: use Test; plan 1; isa_ok(1|2, Junction) 17:38
p6eval rakudo f0fab2: OUTPUT«1..1␤Null PMC access in get_integer()␤current instr.: 'parrot;Junction;!type' pc 2569 (src/classes/Junction.pir:180)␤» 17:39
17:43 jferrero left 17:44 gbacon left
moritz_ rakudo: IO.readline 17:45
p6eval rakudo f0fab2: OUTPUT«Could not locate a method 'readline' to invoke on class 'IO'.␤current instr.: 'die' pc 17498 (src/builtins/control.pir:225)␤»
moritz_ rakudo: IO.get
p6eval rakudo f0fab2: OUTPUT«Null PMC access in get_bool()␤current instr.: 'parrot;IOIterator;' pc 7255 (src/classes/IO.pir:167)␤»
17:46 rindolf joined 17:50 cognominal left, ejs1 joined 17:51 pmurias_ left, gbacon joined 17:54 ejs left
moritz_ rakudo: my $x = :a<5>; say $x.map({.key => .value + 1}).perl 17:57
p6eval rakudo f0fab2: OUTPUT«Method 'key' not found for invocant of class 'Failure'␤current instr.: 'parrot;P6metaclass;dispatch' pc 662 (src/classes/ClassHOW.pir:171)␤»
moritz_ rakudo: my $x = :a<5>; say $x.map({;.key => .value + 1}).perl
p6eval rakudo f0fab2: OUTPUT«["a" => 6]␤»
pugs_svn r26373 | szabgab++ | Smart::Links remove the --fast parameter that was not in use 18:02
18:02 cdarroch joined 18:06 rblasch joined
pugs_svn r26374 | szabgab++ | Smart::Links slight cleanup 18:09
r26375 | szabgab++ | Smart::Links retab 18:16
r26376 | szabgab++ | Smart::Links separate out the perl 6 pod processing sub 18:22
18:26 zamolxes joined 18:29 davidad joined 18:34 jan_ left 18:39 jan_ joined 18:42 FurnaceBoy joined 18:43 alanhaggai left 18:49 rindolf left
jnthn rakudo: say [+] 1..10; 18:49
p6eval rakudo 042614: OUTPUT«55␤»
jnthn perl6: say [+] 1..10;
p6eval elf 26376: OUTPUT«/home/evalenv/pugs/misc/STD_red/match.rb:117:in `block in to_dump0': undefined method `to_dump0' for nil:NilClass (NoMethodError)␤ from /home/evalenv/pugs/misc/STD_red/match.rb:117:in `map'␤ from /home/evalenv/pugs/misc/STD_red/match.rb:117:in `to_dump0'␤ from
../home/evalenv/pugs/...
..pugs, rakudo 042614: OUTPUT«55␤»
18:49 asakra joined
asakra rakudo: system("whoami") 18:50
p6eval rakudo 042614: OUTPUT«Could not find non-existent sub system␤current instr.: '_block14' pc 60 (EVAL_16:41)␤»
moritz_ asakra: it's called run() in Perl 6
asakra rakudo: run("whoami") 18:51
p6eval rakudo 042614: OUTPUT«evalenv␤»
moritz_ asakra: and please don't make anything that breaks p6eval's environment ;-)
jnthn moritz_: I'm sat next to him. ;-)
asakra watching my fingers ;)
skids ...with a tack hammer
moritz_ jnthn: a safe mode for Rakudo would be greatly appreciated 18:52
18:52 rfordinal joined
rfordinal :)) 18:52
jnthn moritz_: Yeah, so I fear I'm about to discover...
rfordinal asakra : kill $$ :))
jnthn It's $*PID 18:53
rfordinal shit
18:54 forcer joined
rfordinal jnthn: photos-a.ak.fbcdn.net/hphotos-ak-sn...2266_n.jpg 18:54
jnthn oh noes it's me 18:55
skids hidez cheezburgerz! 18:56
forcer rakudo: say "hello world"
p6eval rakudo 042614: OUTPUT«hello world␤»
forcer rakudo: say `whoami` 18:57
p6eval rakudo 042614: OUTPUT«say requires an argument at line 1, near " `whoami`"␤␤current instr.: 'parrot;PGE;Util;die' pc 129 (runtime/parrot/library/PGE/Util.pir:85)␤»
moritz_ there are no backticks in Perl 6. 19:00
jnthn suggests that his pm gropu go to the pub, before they hack feather... 19:01
asakra :) let's go!
moritz_ that's not feather
it's timtowtdi.org 19:02
19:02 asakra left 19:04 rfordinal left
pugs_svn r26377 | moritz++ | [t/spec] some unfudges for Rakudo 19:14
Tene rakudo: run('ls /tmp')
p6eval rakudo 042614:
..OUTPUT«01qJGK8PEb␤03CGTte0wU␤08lSVsfsr5␤0aX0WySk8k␤0bUVbBrzOe␤0EsQ3AIlw3␤0HIywuyFSs␤0KeE4YkFAC␤0lOFFKdtAt␤0ohM7aWYBs␤0OlqqtOmwm␤0oqDyzlIrF␤0PUzSTNPYL␤0RZx1Nl268␤0slmd1cWOi␤0TN9RkuDYj␤0TQAdeNMzf␤0Ud2OJFm9K␤0UIce5pXDD␤0usALESIIB␤0UuFKahafv␤0VO3QZBfZ0␤0W1fH47HeO␤0WI2HPAKsZ␤0X0l2TiVys␤0YeI7...
moritz_ rakudo: run('ls /tmp')
p6eval rakudo 042614: OUTPUT«IJhvGTjiMz␤lsItNihCJ2␤»
pugs_svn r26378 | szabgab++ | Smart::Links add tests 19:15
19:16 dukeleto|work left
pmichaud dalek doesn't seem to be reporting commits 19:18
frettled raduko: run('echo OHAI')
(haha)
Tene rakudo: run('pwd')
frettled rakudo: run('echo OHAI')
p6eval rakudo 042614: OUTPUT«/home/evalenv/rakudo␤» 19:19
rakudo 042614: OUTPUT«OHAI␤»
frettled ("raduko" indeed)
19:19 dukeleto|work joined
frettled hmmmmm 19:19
meppl good night 19:21
19:21 xinming_ joined 19:22 forcer left 19:23 meppl left 19:24 xinming left 19:26 cspencer joined 19:28 FurnaceBoy left 19:30 PhatEddy left 19:34 barney joined 19:41 amoc left
cspencer rakudo: say acosec(pi/2) 19:46
p6eval rakudo 042614: OUTPUT«0.819416801292645␤»
moritz_ cspencer: the release is done, feel free to push your trig patch
cspencer just writing some spec tests, should be wrapped up in the next couple hours :) 19:47
i think some of the functions may have been incorrect in the PIR, just verifying against the P5 Math::Trig module
moritz_ 10507 passing tests 19:48
19:51 ejs1 left
frettled nice! 19:53
19:54 ruoso left
moritz_ now we need more tests 19:54
nopaste.snit.ch/16389 # number of tests in t/, by category 19:56
cspencer i should be adding several hundred more in a bit :)
19:57 barney left
cspencer moritz_: do you happen to know where a lot of the trig functions originated? 19:59
19:59 rblasch1 joined
moritz_ cspencer: what do you mean? who wrote them? 19:59
cspencer moritz_: yes
moritz_ cspencer: git blame is your friend ;-) 20:00
cspencer heh, ok :)
many of them were missing tests
moritz_ no surprise here
cspencer and i'm using Math::Trig to auto-gen some right now, but the two don't agree
and looking closer, i tend to think that some may be incorrect
(for the less used ones like "acosec" at least)
moritz_ no surprise here ;-)
cspencer so i'm going to rewrite them to agree with whatever Math::Trig says 20:01
and assume that it's more correct
moritz_ I think atan2() changed a bit with Perl 6, so be careful there
(but I don't remeber the details)
cspencer that one's okay and is passing
moritz_ ok
cspencer 22 down, 3 left to gen tests for 20:02
20:04 irkoch joined 20:06 ejs joined
pugs_svn r26379 | szabgab++ | Smart::Links add more test, start reporting on unrecognized links 20:06
20:09 rblasch2 joined, rblasch1 left 20:11 rblasch2 left
pugs_svn r26380 | szabgab++ | fix the syntax of some smart links 20:12
20:16 aindilis joined, rblasch left
pugs_svn r26381 | szabgab++ | Smart::Links eliminates some fals error reporting 20:17
[particle] cspencer: i may be to blame for them 20:41
it was so long ago...
but they should be pretty easy to fix up, with proper tests
cspencer [particle]: yes, it's no problem, it's just somewhat more difficult to verify sometimes :) 20:42
moritz_ anybody want to review/comment on a blog post before I publish it? 20:46
nopaste.snit.ch/16390 20:47
20:48 masak joined
masak man, I should have test-run November before the Rakudo release. :/ 20:49
pugs_svn r26382 | szabgab++ | Smart::Links more tests
masak needs to write this down for next time
moritz_ masak: did it break horribly?
masak I'm afraid so.
I need someone to talk to about it... :)
rakudo: for ["A"], 1, ["B"], 2 -> @x, $y { say @x, $y } 20:50
p6eval rakudo 042614: OUTPUT«A1␤B2␤»
masak rakudo: for ["A"], 1, ["B"], 2 -> Object @x, $y { say @x, $y }
p6eval rakudo 042614: OUTPUT«Non-Positional argument or Positional of wrong element type for @x in call to _block32␤current instr.: 'die' pc 17536 (src/builtins/control.pir:225)␤»
masak cspencer: around?
cspencer masak: yessir
patmat which tutorial is at the moment very good for perl6?
ebook, whatever
masak rakudo: join '|'
p6eval rakudo 042614: OUTPUT«Not enough arguments for join␤current instr.: 'die' pc 17536 (src/builtins/control.pir:225)␤»
cspencer masak: uh oh 20:51
masak cspencer: I see you ported join to the setting. kudos for that.
however...
cspencer: please don't introduce arbitrary constraints on perfectly good functions. it breaks peoples perfectly good code...
cspencer: I'll stop now, before I get heated up. :) just don't do it. 20:52
kthxbai.
cspencer masak: sorry about that, i was relatively convinced at the time that i was following some spec :)
masak cspencer: well, as far as I can tell...
there's no such spec.
Perl 5 thinks it's OK, S29 doesn't mention empty lists... 20:53
masak pushes a fix for that
moritz_ rakudo: say join();
p6eval rakudo 042614: OUTPUT«Not enough arguments for join␤current instr.: 'die' pc 17536 (src/builtins/control.pir:225)␤»
moritz_ rakudo: say ().join
p6eval rakudo 042614: OUTPUT«Cannot reduce() empty list␤␤»
cspencer doh 20:54
i should roll that back :(
masak I'm doing it now.
cspencer many mega apologies
masak cspencer: it's OK. just don't do it again. :)
we are heavy on forgiveness, as you know.
cspencer masak: deal
masak moritz_: also gives one more thing to spectest :P 20:55
moritz_ masak: I'm writing these now ;-)
masak moritz_++
the less November can be a test suite for regressions, the better.
[particle] patmat: moritz_++ has a good tutorial if you know perl 5
perlgeek.de/blog-en/perl-5-to-6/ 20:56
masak rakudo: for ["A"], ["B"] -> Object @x { say @x }
20:56 dukeleto|work left
p6eval rakudo 042614: OUTPUT«Non-Positional argument or Positional of wrong element type for @x in call to _block29␤current instr.: 'die' pc 17536 (src/builtins/control.pir:225)␤» 20:56
cspencer masak: it was probably the "dies_ok({ join() }, 'join() must have arguments');" test in join.t that prompted that display of bad coding taste
masak rakudo: for ["A"], ["B"] -> @x { say @x }
p6eval rakudo 042614: OUTPUT«A␤B␤»
masak cspencer: not so much bad taste as misreading what the test tested against. 20:57
cspencer masak: yes, that too :)
20:57 dukeleto|work joined
masak is there any reason for the 'Object' version above to fail? 20:58
20:58 alester left
skids rakudo: ["A"].isa(Object).say 20:58
masak rakudo: say ["A"] ~~ Array[Object]
p6eval rakudo 042614: OUTPUT«1␤»
rakudo 042614: OUTPUT«Use of protoobject as value␤0␤»
masak skids: "Object @a" means "Positional @a of Object" 20:59
er. kinda.
skids Yes, but you are assigning @x[0] the value ["A"] not "A" 21:00
masak indeed.
that's the idea. that's why the param has a @ sigil.
skids for ["A"], ["B"] -> @x { say @x.perl.say } 21:01
masak but the "Object" typing says something about the elements of @x, not about @x itself.
skids rakudo: for ["A"], ["B"] -> @x { say @x.perl.say }
p6eval rakudo 042614: OUTPUT«["A"]␤1␤["B"]␤1␤»
masak skids: yes. that's what I expect. 21:02
skids rakudo: for [["A"]], [["B"]] -> Object @x { say @x }
p6eval rakudo 042614: OUTPUT«Non-Positional argument or Positional of wrong element type for @x in call to _block31␤current instr.: 'die' pc 17536 (src/builtins/control.pir:225)␤»
masak not sure p6eval responds if you put a space at the beginning like that. 21:03
skids rakudo: for *,* -> Whatever @x { say @x }
p6eval rakudo 042614: OUTPUT«Non-Positional argument or Positional of wrong element type for @x in call to _block29␤current instr.: 'die' pc 17536 (src/builtins/control.pir:225)␤» 21:04
skids rakudo: for 3,4 -> Num @x { say @x } 21:05
p6eval rakudo f11795: OUTPUT«Non-Positional argument or Positional of wrong element type for @x in call to _block27␤current instr.: 'die' pc 17536 (src/builtins/control.pir:225)␤»
skids rakudo: for [3],[4] -> Num @x { say @x }
p6eval rakudo f11795: OUTPUT«Non-Positional argument or Positional of wrong element type for @x in call to _block29␤current instr.: 'die' pc 17536 (src/builtins/control.pir:225)␤»
pmichaud Object @x means Positional[Object]
moritz_ and thus the same as @x (in block signatures) 21:06
in all signatures, actually
pmichaud I'm not sure of that.
There was a fair bit of discussion about parametric roles at NPW.
In particular, it was decided that [1,2,3] is not "does Positional[Int]" 21:07
moritz_ masak: there was a test in join.t that join() should die :/
pmichaud I suppose a case could be made that all untyped arrays do Positional[Object], but afaik that hasn't been specced anywhere. jnthn++ would be the one to clarify it. 21:08
pugs_svn r26383 | moritz++ | [t/spec] test join on empty list
21:11 masak left 21:13 ispy_ left, ejs left
jnthn back from the krčma 21:20
BA.pm were quite happy about having the release named after them. :-)
rakudo: my @a; say @a ~~ Positional
p6eval rakudo f11795: OUTPUT«1␤»
jnthn rakudo: my @a; say @a ~~ Positional[Object]
p6eval rakudo f11795: OUTPUT«0␤»
jnthn my @a; say @a.of 21:21
rakudo: my @a; say @a.of
p6eval rakudo f11795: OUTPUT«Object␤»
pmichaud jnthn: excellent
rakudo: say /x/.WHAT;
moritz_ jnthn: do you think @a ~~ Positional[Object] should be True?
p6eval rakudo f11795: OUTPUT«Regex␤»
jnthn pmichaud++
pmichaud rakudo: $_ = 'abc'; say /b/ ?? 'yes' !! 'no';
p6eval rakudo f11795: OUTPUT«yes␤»
pmichaud rakudo: $_ = 'abc'; say /x/ ?? 'yes' !! 'no'; 21:22
p6eval rakudo f11795: OUTPUT«no␤»
21:22 wknight8111 joined
jnthn moritz_: I know why it's being considered not that. 21:22
moritz_: But the .of result is correct and thus I think it should do Positional[Object].
moritz_ jnthn: good 21:23
jnthn moritz_: Is there a test and a ticket?
moritz_ rakudo: say <foo bar>.keys.of
p6eval rakudo f11795: OUTPUT«Object␤»
moritz_ jnthn: don't think so (unless masak just reported one)
revdiablo: and in this example, should it give Int?
revdiablo: sorry, I meant jnthn 21:24
where did that r come from? ;-)
jnthn moritz_: I think maybe not. 21:25
moritz_: I'm not sure I like typed arrays just "appearing"...
When they weren't asked for.
Also, I suspect .keys may not always be Int.
moritz_ hm 21:26
jnthn (e.g. see custom keys or whatever they're called in S09)
moritz_ if they are custom, then .keys.of can be of that custom type
21:26 dalek left, dalek joined
jnthn I'm not totally convinced they need all be of the same type. 21:28
moritz_ ok, we'll leave it for now then
jnthn IMO, we really shouldn't be nailing down expected return types too soon in these cases.
pmichaud moritz: (blog post) there's an error in 21:29
# output:
# a | b
# c | c
moritz_ ah, right
moritz_ should really copy&paste more
pmichaud: thanks
pmichaud for the use of .kv on a list, it's probably worth showing what the output would be.
Perl 5 folks might not immediately accept array element indices as "keys" 21:30
other than those items, it looks like a good post to me.
(even with those items it's a good post :-) 21:31
moritz_ pushes to test dalek
jnthn I would do a Rakudo day tomorrow, but after a while away I have quite a pile of tasks tomorrow that would be rather a distraction.
So will do a couple of 'em next week when things are calmer.
pmichaud jnthn: I somewhat expected them to wait until next week :-)
moritz_ pmichaud: if can think of any other easy-to-explain but impressive feature that I could right about I'd be glad
pmichaud (for exactly the reason you cited :-)
I think sorting hashes by value is easy-to-explain and impressive 21:32
also reductions.
moritz_ you means %h.sort: *.value ?
pmichaud yes.
Considering what it required in P5.
jnthn Some folks tonight were quite impressed with if [==] @foo { }
And similar. 21:33
pmichaud: I thought I might find time for it, because as of Monday my task list for this week was pretty light. But since I got back quite a few little bits appeared. 21:34
21:34 skids left
pmichaud also, being able to do things like sort by case-insensitive value: %h.sort: *.value.lc 21:34
jnthn Anyway, next week. :-)
Oh, the *.foo is *so* nice. :-)
Does that second one work?
pmichaud afaik it does
moritz_ rakudo: say {a => 'f' b => 'G' }.sort(*.value.lc).perl 21:35
p6eval rakudo f11795: OUTPUT«Statement not terminated properly at line 1, near "b => 'G' }"␤␤current instr.: 'parrot;PGE;Util;die' pc 129 (runtime/parrot/library/PGE/Util.pir:85)␤»
moritz_ rakudo: say {a => 'f', b => 'G' }.sort(*.value.lc).perl
p6eval rakudo f11795: OUTPUT«invoke() not implemented in class 'String'␤current instr.: 'parrot;Any;!COMPARE_DO' pc 13582 (src/builtins/any-list.pir:356)␤»
pmichaud my %h = <a alpha c Charlie b BETA>; say %h.sort(*.value.lc).perl;
ooh, I'm guessing it doesn't. 21:36
my %h = <a alpha c Charlie b BETA>; say %h.sort({.value.lc}).perl;
21:36 cognominal joined
pmichaud rakudo: my %h = <a alpha c Charlie b BETA>; say %h.sort({.value.lc}).perl; 21:36
p6eval rakudo f11795: OUTPUT«["a" => "alpha", "b" => "BETA", "c" => "Charlie"]␤»
pmichaud rakudo: my %h = <a alpha c Charlie b BETA>; say %h.sort(*.value.lc).perl;
p6eval rakudo f11795: OUTPUT«invoke() not implemented in class 'String'␤current instr.: 'parrot;Any;!COMPARE_DO' pc 13582 (src/builtins/any-list.pir:356)␤»
jnthn Thing is that *.value becoems a closure.
pmichaud *.value.lc doesn't do the expec.... right 21:37
ingy pmichaud: did you figger out that mac bug?
jnthn I don't see an easy way to deal with that issue.
pmichaud ingy: no, not yet. I still need to get some other darwin testers on it.
ingy pmichaud: anything I can do to help?
pmichaud ingy: at this stage, I'd say make sure there aren't any copies of rakudo or parrot on the system, and try with a fresh checkout. 21:38
When you get to the stage that fails, we'll want to slap gdb on it.
and get a backtrace
and start looking from there.
jnthn Did we not take a backtrace and find it failed in library loading? 21:39
21:39 davidad left
pmichaud yes, but I didn't copy the backtrace (pmichaud--) 21:39
I got sidetracked onto some other task, I think.
jnthn ah, ok 21:40
well, debugging from there needs some gdb skill I guess.
I know enough to get a bt but little beyond that.
Tene jnthn: I'm getting a really weird segfault in my rakudo branch (porting to .HLL 'Perl6')... I ran out of time to debug it last night.
If you're in the mood to deal with segfaults... ;)
I'll be trying again in a few hours, hopefully. 21:41
jnthn I suspect I'll be asleep in a few hours. 21:42
21:42 donaldh joined
jnthn If you can get a bt or stick the stuff in a branch so I can pull it and try it out though, can probably look soonish. 21:43
Tene It's in the 'hll' branch
nopaste.snit.ch/16388 is the start of the bt...
jnthn stack overflow, maybe? 21:44
Tene it's some hundred thousand stack frames in. 21:45
so, likely
jnthn Something to do with creating the PMCProxy recursively for a type.
Tene right. 21:46
jnthn Or trying to...
21:46 jferrero joined
Tene I didn't remember the syntax to go to the end of the bt until I saw moritz doing it in the scrollback today 21:46
jnthn I guess trying to work out which PMC the PMC Proxy is failing to create is a good first step.
Tene (bt -20)
moritz_ Tene: it wasn't me, but thanks for speaking well of me ;-) 21:47
Tene moritz_: I was reading scrollback before really waking up, so... not surprised I got it wrong.
bacek rakudo: rule c_body { '{' ~ '}' [ .* <c_body>* ] }; say '{ blah }' ~~ /<c_body>/; 21:55
p6eval rakudo ffcde8: OUTPUT«Unable to parse c_body, couldn't find final '}'␤current instr.: 'parrot;PGE;Match;FAILGOAL' pc 2953 (compilers/pge/PGE/Regex.pir:458)␤»
bacek What I'm doing wrong?
moritz_ bacek: PGE currently doesn't backtrack to find the closing delimiter 21:56
bacek rakudo: rule c_body { '{' ~ '}' [ <-[{}]>* <c_body>* ] }; say '{ blah }' ~~ /<c_body>/;
p6eval rakudo ffcde8: OUTPUT«{ blah }␤»
bacek ah!
rakudo: rule c_body { '{' ~ '}' [ <-[{}]>* <c_body>* ] }; say '{ blah { foo } }' ~~ /<c_body>/;
p6eval rakudo ffcde8: OUTPUT«{ blah { foo } }␤»
pmichaud yes, I need to change that.
fixing.
bacek hooray. It works. 21:57
22:01 jnthn left, buu left, Maddingue left, IRSeekBot left 22:02 jnthn joined, zev joined, IRSeekBot joined, Maddingue joined, buu joined, irc.freenode.net sets mode: +o jnthn
cspencer is anyone else experiencing a build failure on rakudo HEAD? 22:02
22:02 donaldh left
pugs_svn r26384 | pmichaud++ | Update goal-matching semantics to allow expression backtracking. 22:03
cspencer i'm getting this error: pastie.org/456398
22:04 iblechbot left
Tene jnthn: could you reproduce? 22:04
pmichaud cspencer: make sure your parrot is up-to-date.
jnthn Tene: Kinda distracted with other stuff atm, sorry... 22:05
Will probably be tomorrow before I can look at it.
Tene jnthn: no problem. don't worry about it. :)
jnthn I'm still feeling a little sleep-deprived post-NPW and hackathon.
22:05 wayland76 joined
jnthn (Which were entirely worth getting sleep deprived for.) 22:05
pugs_svn r26385 | pmichaud++ | Revert previous commit -- changing the order isn't quite so straightforward. 22:07
wayland76 I missed that, but I'm sleep deprived :)
22:14 nihiliad left 22:20 pmurias joined
eiro my %foo = ( goo => < i want a hash > ); %foo<goo> is an array here. how to tell perl6 to have a hash ? 22:21
moritz_ my %foo = goo => { #[ hash here ] }; 22:23
22:23 pmurias left 22:24 wknight8111 left
eiro moritz_, that's what i tried but %foo.perl gives me {"goo" => { ... }} 22:25
that's weird!
my %foo = ( goo => { < i want a hash > } ); say %foo.perl;
rakudo: my %foo = ( goo => { < i want a hash > } ); say %foo.perl;
p6eval rakudo ffcde8: OUTPUT«{"goo" => { ... }}␤»
jnthn That's because { } in this case is creating a block. 22:26
Put hash in front to disambiguate.
eiro jnthn, i understood the pb but not the solution 22:29
jnthn rakudo: my %foo = ( goo => hash { < i want a hash > } ); say %foo.perl; 22:34
p6eval rakudo ffcde8: OUTPUT«Odd number of elements found where hash expected␤current instr.: 'parrot;Perl6Hash;!STORE' pc 10204 (src/classes/Hash.pir:237)␤»
jnthn closer ;-) 22:35
rakudo: my %foo = ( goo => hash { < i want a hash >.pairs } ); say %foo.perl;
p6eval rakudo ffcde8: OUTPUT«Odd number of elements found where hash expected␤current instr.: 'parrot;Perl6Hash;!STORE' pc 10204 (src/classes/Hash.pir:237)␤»
jnthn rakudo: my %foo = ( goo => hash < i want a hash > ); say %foo.perl;
p6eval rakudo ffcde8: OUTPUT«{"goo" => {"i" => "want", "a" => "hash"}}␤»
jnthn oh yay.
eiro oh! last syntax is cool! 22:39
thanks
22:40 exodist left
eiro 'night all! 22:41
22:41 km2 left 22:50 Limbic_Region joined 23:02 payload joined 23:06 skids joined 23:14 jferrero left 23:19 fridim_ left 23:24 hcchien_ joined, hcchien left
japhb moritz_: what formatter is nopaste.snit.ch/16390 written for? 23:24
23:27 payload left 23:38 hcchien joined, hcchien_ left
pugs_svn r26386 | cspencer++ | Expanded coverage for trigonometry subs. 23:46
LylePerl lyle 23:47
Oops, was supposed to be searching if someone had mentioned me or asked something :( 23:48
23:52 cspencer left, xinming_ left 23:53 mjk joined 23:56 mjk left 23:57 clkao_ joined, clkao left

Powered by Cro and the Raku® Programming Language.

Please report any issues / comments / feature requests as an issue on App::Raku::Log.

Thank you!