»ö« Welcome to Perl 6! | perl6.org/ | evalbot usage: 'perl6: say 3;' or rakudo:, niecza:, std:, or /msg p6eval perl6: ... | irclog: irc.perl6.org/ | UTF-8 is our friend! | Rakudo Star Released! Set by diakopter on 6 September 2010. |
|||
00:04
jhuni joined
00:18
phio left
00:19
kst left
00:20
kst joined
00:30
jjore left
00:32
jjore joined
00:35
risou left
00:40
QinGW joined
00:42
flatwhatson joined
00:49
Chillance left
00:54
tylercurtis left
00:59
lichtkind left
|
|||
Alias__ | rakudo: all().Bool | 01:02 | |
p6eval | rakudo : ( no output ) | ||
Alias__ | rakudo: say all().Bool | ||
p6eval | rakudo : OUTPUT«Bool::True» | ||
Alias__ | rakudo: say none().Bool | 01:03 | |
p6eval | rakudo : OUTPUT«Bool::True» | ||
Alias__ | rakudo: say notall().Bool | ||
p6eval | rakudo : OUTPUT«Could not find sub ¬all in main program body at line 22:/tmp/4ptmvtDjMs» | ||
diakopter | rakudo: say ?none | 01:04 | |
p6eval | rakudo : OUTPUT«Bool::True» | ||
diakopter | rakudo: say ?some | ||
p6eval | rakudo : OUTPUT«Could not find sub &some in main program body at line 22:/tmp/u3YbHiBgzy» | ||
Alias__ | rakudo: say any().Bool | 01:05 | |
p6eval | rakudo : OUTPUT«Bool::False» | ||
01:15
am0c joined
01:26
alc joined
01:34
gimix joined
01:35
sftp left
01:48
masonkramer left,
masonkramer joined
01:50
Grrrr joined
01:53
f00li5h left
01:57
shi left
02:02
flatwhatson left
02:27
flatwhatson joined
02:39
shi joined
02:44
adu joined
02:45
skangas left
02:48
kst left
02:49
kst joined
02:54
LaVolta joined
|
|||
LaVolta | hi #perl6...long time no see :) | 02:55 | |
sjohnson | hi | 02:58 | |
dukeleto | LaVolta: welcome back. | 02:59 | |
LaVolta | I am excited, just find out my Perl6ish way of calculating S = a + aa + aaa + aaaa ... | ||
dalek | odel: 55673ae | diakopter++ | / (3 files): [dotnet] implement regex subrule compilation add a test. |
||
LaVolta | [+] (-> $n, { $n, -> $a, { $a ~ $n } ... * } )(5)[^4] | ||
:) | |||
sjohnson | rakudo: my $s; for ^5 { $s ~= 'a' X $_ }; say $s | 03:00 | |
p6eval | rakudo : OUTPUT«aaaaa» | ||
sjohnson | rakudo: my $s; for ^5 { $s .= 'a' X $_ }; say $s | ||
p6eval | rakudo : OUTPUT«===SORRY!===Quoted method name requires parenthesized arguments at line 22, near " X $_ }; s"» | 03:01 | |
sjohnson | ahh, not good enough at perl6 yet | ||
sjohnson sulks in the corner | |||
LaVolta | lol... | 03:02 | |
sjohnson | rakudo: my $a = "mammy"; $a ~= " muffin"; say $a | 03:04 | |
p6eval | rakudo : OUTPUT«mammy muffin» | ||
sjohnson | rakudo: for (^5) { say $_ } | ||
p6eval | rakudo : OUTPUT«01234» | ||
sjohnson | rakudo: say 'a' X 5 | 03:05 | |
p6eval | rakudo : OUTPUT«a5» | ||
sjohnson | ahh.. there's the problem! | ||
X operator isn't the same as in p5 | |||
LaVolta | yeah...that's where the problem at... | ||
sjohnson scratches his head | 03:08 | ||
LaVolta | rakudo: [+](1, * ~ 1 ... *)[^5] | 03:09 | |
p6eval | rakudo : ( no output ) | ||
LaVolta | rakudo: say [+](1, * ~ 1 ... *)[^5] | ||
p6eval | rakudo : OUTPUT«12345» | ||
LaVolta | cool | ||
I | 03:11 | ||
got a new one: [+](->$n,{$n,*~$n...*})(5)[^4] | |||
colomon | rakudo: say (1, * ~ 1 ... *)[^5].perl | 03:18 | |
p6eval | rakudo : OUTPUT«(1, "11", "111", "1111", "11111")» | ||
colomon | ah | ||
rakudo: say (->$n,{$n,*~$n...*})(5)[^4].perl | 03:20 | ||
p6eval | rakudo : OUTPUT«(5, "55", "555", "5555")» | ||
colomon | rakudo: say (1..5).map({ 1 x $_ }).perl | 03:21 | |
p6eval | rakudo : OUTPUT«("1", "11", "111", "1111", "11111")» | ||
adu | rakudo: say 5 | 03:22 | |
p6eval | rakudo : OUTPUT«5» | ||
adu | YEY | ||
03:25
alester joined
03:28
shi left
|
|||
LaVolta | colomon: nice 'x' operator :) | 03:28 | |
mine's over-complicated when deal with string replication. | 03:30 | ||
colomon | Of course, if you just want to get 12345, there's always... | 03:31 | |
dalek | ok: 5d76665 | hinrik++ | / (2 files): Depend on Perl6::Doc 0.47 to avoid test failures |
||
ok: c4ecdb9 | hinrik++ | Changes: v0.24 - Depend on Perl6::Doc 0.47 to avoid test failures |
|||
colomon | rakudo: say +[~] 1..5 | ||
p6eval | rakudo : OUTPUT«12345» | ||
colomon | rakudo: say +[~] 1..6 | ||
p6eval | rakudo : OUTPUT«123456» | ||
03:32
dnewkirk left,
justatheory joined
|
|||
LaVolta | thanks, colomon. | 03:35 | |
sjohnson | rakudo: say "a" x 5; | 03:50 | |
p6eval | rakudo : OUTPUT«aaaaa» | 03:51 | |
sjohnson | ah, simple mistake. whoops | ||
LaVolta | :), i didn't realized what typed is cross operato... | 03:54 | |
*r | |||
(omg, serious typos all around) | |||
I am sorry | 03:55 | ||
I was trying to figure out a general way of calc the sum of n, nn, nnn, nnnn...(repeat m times) | 03:56 | ||
dukeleto | LaVolta: such as 1 + 11 + 111 + ... ? | 03:59 | |
LaVolta | yea, dukeleto | ||
sjohnson | heh | ||
i dont know any tricky cool ways to do it | |||
dukeleto | rakudo: say +[+] 1,11,111 ... 11111 | 04:00 | |
sjohnson | rakudo: my $total; my $n = 10; $total += (1 x $_) for ^$n; say $total | ||
p6eval | rakudo : OUTPUT«Method 'count' not found for invocant of class 'Failure' in <anon> at line 835:CORE.setting in 'List::Bool' at line 1 in <anon> at line 853:CORE.setting in <anon> at line 855:CORE.setting in 'List::Bool' at line 1 in 'prefix:<?>' at line 468:CORE.setting in 'reducewit… | ||
rakudo : OUTPUT«123456789» | 04:01 | ||
sjohnson | rakudo: my $total; my $n = 10; $total += ("1" x $_) for ^$n; say $total | ||
p6eval | rakudo : OUTPUT«123456789» | ||
LaVolta | I still remember the day (a CS freshman), my teacher told the class to write a small C program to do it | ||
sjohnson | rakudo: my $total; my $n = 10; $total += ("1" x $_).int for ^$n; say $total | ||
p6eval | rakudo : OUTPUT«Method 'int' not found for invocant of class 'Str' in <anon> at line 22:/tmp/Bc4WNbg8zY in main program body at line 1» | ||
sjohnson | ahh, i give up | ||
Tene | rakudo: sub foo { [+] map { 1 x $_ } for 1..$^n }; say foo(5); | 04:02 | |
phenny | Tene: 05 Dec 10:09Z <masak> tell Tene after I removed ihrd's Routes, I rewrote it as URI::Dispatcher. I'd be happy to hear what you think of it. | ||
p6eval | rakudo : OUTPUT«00000» | ||
dukeleto | rakudo: say +[+] (1, 11, 111) | ||
p6eval | rakudo : OUTPUT«123» | ||
Tene | rakudo: sub foo { [+] map { 1 x $_ } 1..$^n }; say foo(5); | ||
p6eval | rakudo : OUTPUT«===SORRY!===Unable to parse blockoid, couldn't find final '}' at line 22» | ||
Tene | rakudo: sub foo { [+] map { 1 x $_ }, 1..$^n }; say foo(5); | ||
p6eval | rakudo : OUTPUT«12345» | ||
Tene | There we go. | ||
rakudo: sub foo { [+] map { 1 x $_ }, 1..$^n }; say foo(50); | |||
p6eval | rakudo : OUTPUT«1.23456790123457e+49» | ||
dukeleto | Tene: nice. | 04:03 | |
sjohnson | what does the cute [+] thing do? | ||
04:03
whiteknight left
|
|||
sjohnson | just tells it to keep adding the block statement? | 04:03 | |
Tene | sjohnson: [] is the reduce operator | ||
it reduces a list with the operator inside the []s | |||
sjohnson tents fingers.. interesting | |||
Tene | it's the same as @list.reduce(&infix:<+>); oslt | 04:04 | |
I don't remember what named forms of reduce may or may not be in Perl 6 these days. | |||
aka foldr/foldl, but it respects the associativity of the op | |||
LaVolta | Tene: neat. | 04:05 | |
dukeleto | sjohnson: [] is a meta-operator | ||
sjohnson: you give an operator inside | |||
sjohnson | witchcraft operator!!! | ||
dukeleto | sjohnson: and it applies it to a list/array | ||
sjohnson | ill have to try it out a bit later | ||
dukeleto | rakudo: [+] 1 .. 10 | 04:06 | |
p6eval | rakudo : ( no output ) | ||
dukeleto | rakudo: ~[+] 1 .. 10 | ||
p6eval | rakudo : ( no output ) | ||
LaVolta | say it :) | ||
dukeleto | rakudo: say ~[+] 1 .. 10 | ||
Tene | rakudo say [+] 1..10 | ||
p6eval | rakudo : OUTPUT«55» | ||
dukeleto is rusty | |||
Tene | rakudo: say [+] 1..10 | ||
p6eval | rakudo : OUTPUT«55» | ||
dukeleto | sjohnson: that is the factorial function at 10 | ||
Tene omits colon | |||
No, factorial is [*] | |||
colomon | rakudo: sub postfix:<!>($n) { [*] 1..$n }; say 10! | 04:07 | |
p6eval | rakudo : OUTPUT«3628800» | ||
sjohnson | rakudo: say 5! | ||
p6eval | rakudo : OUTPUT«===SORRY!===Confused at line 22, near "say 5!"» | ||
sjohnson | maybe in perl 7 :) | ||
yeah, factorial is uses multiplication technology | |||
Tene | sjohnson: Just package up a distro with that in the setting, and you're done. | ||
sjohnson | i used to think it was addition too. is there a term for addition only? | ||
how about use Tene; | 04:08 | ||
:) | |||
easier to remember | |||
Tene | sjohnson: I'd be glad to let you use a software version of myself to use as a Perl 6 advisor in exchange for being uploaded to make it. | 04:09 | |
sjohnson | i have to figure out how to upload you first | 04:10 | |
modern technology hasn't figured out brain interfaces with computers yet | |||
dukeleto | Tene: blarg. That is sad. Of course. I did summation | 04:11 | |
dukeleto has had a long day | |||
Tene | :) | 04:12 | |
LaVolta | all my tries focused on inlining the sub, using anonfunc, but ignored the truth that we all need simplification | ||
lunch time, see you later | 04:13 | ||
adu | sjohnson: yes en.wikipedia.org/wiki/Arithmetic_progression | 04:22 | |
sjohnson: the additive factorial 1 + 2 + ... + n = n(n+1)/2 so it is much less interesting | 04:24 | ||
04:30
alc left
04:33
kaare joined,
kaare is now known as Guest4757
04:45
envi joined
04:46
satyavvd joined
05:00
am0c left
05:03
alc joined
05:07
orafu left,
orafu joined
05:15
alester left
05:17
Trashlord left
05:21
zby__ joined,
zby left
05:33
sftp joined
05:35
cjk101010 joined
05:53
adu left
06:02
yves_ joined
06:06
sftp left
06:17
jedai left,
jedai joined
06:19
kjeldahl joined
06:31
PerlJam left,
PerlJam joined
06:34
am0c joined
07:00
wtw joined,
kst left
07:01
kst joined,
Guest4757 is now known as kaare_,
justatheory left
|
|||
moritz_ | rakudo: say [+] 1..10 | 07:03 | |
p6eval | rakudo : OUTPUT«55» | ||
moritz_ | rakudo: say [+] 'foo' | 07:04 | |
p6eval | rakudo : OUTPUT«0» | ||
07:13
glow left
07:14
cjk101010 left
|
|||
dalek | : a4c325a | (Tadeusz Sośnierz)++ | misc/perl6advent-2010/schedule: Signed in for day 8th |
07:44 | |
07:45
nymacro joined
08:04
glow joined
08:10
jfried joined
08:15
xinming_ joined
08:18
xinming left
08:35
spetrea left
08:36
am0c left
08:47
timbunce joined
08:48
wamba joined
09:03
wallberg joined
09:05
kst left
09:06
kst joined
09:12
kjeldahl_ joined
09:19
skangas joined
09:37
dakkar joined
|
|||
moritz_ | linuxfr.org/2010/12/04/27645.html # mentioned the advent calendar | 09:39 | |
developers.solidot.org/developers/1...0223.shtml Japanese (?) coverage | 09:40 | ||
09:41
tzhs joined
09:57
jerome joined
10:10
kst left,
QinGW left
10:11
kst joined
10:13
glow left
10:24
LaVolta left
10:31
daxim joined
10:32
knewt2 left
10:33
knewt2 joined
10:35
glow joined
11:05
donaldh joined
11:15
wamba left
11:34
skangas left
11:38
f00li5h joined
11:41
satyavvd left
11:44
masak joined
|
|||
masak | oh hai, #perl6! | 11:44 | |
moritz_ | lolitsmasak! | 11:45 | |
masak: (small reminder, you're scheduled for tomorrow's advent post) | |||
masak | acknowledged. thanks. | ||
I'm planning on writing it tonight. | 11:46 | ||
mathw | oh hai masak | ||
oh hai evreewun els | 11:47 | ||
Tene | masak: I think you were trying to get my attention recently? | 11:51 | |
masak | Tene: yes, I've made a quick Routes replacement in Web.pm -- just fishing for comments. | 11:52 | |
Tene | Ah. I'll see what I can do. | 11:53 | |
masak | \o/ | 11:55 | |
12:05
timbunce left
12:06
jhuni left
12:09
gimix left
12:13
dsp_ left
12:14
dsp_ joined
12:25
alc left
12:28
skangas joined,
alc joined
12:34
finanalyst joined
12:36
shi joined
12:41
kaare_ left
12:45
f00li5h left
|
|||
finanalyst | hello 6-people. I havent been around for a while. What is currently being used for module loading? proto or neutro? | 12:50 | |
moritz_ | use; :-) | 12:53 | |
neutro for installation | |||
12:53
donaldh left
|
|||
moritz_ | (oh, and I implemented some simple forms of 'requuire' :-) | 12:53 | |
12:54
timbunce joined
|
|||
finanalyst | moritz_: thanx. How is best to install neutro itself? | 12:57 | |
moritz_ | finanalyst: dunno; are there no instructions in the README? | ||
colomon | There are instructions in the README | 12:58 | |
12:59
f00li5h joined
|
|||
colomon just realized the reason his walk felt cold this morning was that it was 4F colder than any previous walk this season. | 12:59 | ||
finanalyst | no. i looked on github at readme, but no installation instructions, unless they are hidden somewhere. proto instructions much better | ||
moritz_ | finanalyst: sounds to me like it doesn't need installation | 13:00 | |
wait | |||
Bootstraping: | |||
As neutro is not dependency-free, it comes with a set of libs which | |||
will help it install itself. To bootstrap neutro, use something like | |||
this: | |||
PERL6LIB=tmplib bin/neutro . | |||
takadonet | morning all | ||
phenny | takadonet: 04 Dec 15:32Z <smash> tell takadonet gil.di.uminho.pt/users/smash/rakudo-bench.html updated | ||
takadonet | !!! my first message from phenny! | 13:01 | |
masak | The dark side of opern source conferences -- lwn.net/SubscriberLink/417952/bf6a55b67170ff0e/ -- might interest some people in the "how can we scale kindness" movement in here. | 13:23 | |
13:24
MayDaniel joined,
MayDaniel left,
MayDaniel joined
|
|||
moritz_ | (was actually posted to #parrot some days ago) | 13:25 | |
masak | oh, good. | ||
I fear I used to be a #parrot regular, but I'm not any more. :/ | 13:26 | ||
nowadays I log onto #parrot by need. | |||
moritz_ searches in the logs for the relevant discussion | |||
irclog.perlgeek.de/parrot/2010-12-03#i_3053709 | 13:28 | ||
13:28
icwiener joined
|
|||
masak | thanks. | 13:29 | |
moritz_ | actually not too much of a discussion | ||
masak | but what there is is a good read. | 13:30 | |
"know how to be nice". I like that. | |||
tadzik | hello | 13:34 | |
masak | tadzik: \o | ||
moritz_ | masak: "nice by default" would also be a good policy | 13:35 | |
masak | yeah. also "assume good intentions". | ||
I knew a girl who was a master of empathy and engaging the good side of people. don't think she was too aware of that herself. just thinking of what she'd have done in a given situation usually pulls up a few good ideas for me. :) | 13:37 | ||
tadzik | mathw++ # advent calendar | 13:38 | |
takadonet | www.reddit.com/r/programming/commen...e_x_and_z/ | ||
masak | takadonet++ | 13:39 | |
mathw | Do I want to see what Reddit think of my post! | ||
mathw upvotes most gratuitously | |||
masak | nuttin', so far :) | ||
takadonet | i just posted this 10 mins ago | 13:40 | |
13:41
MayDaniel left,
Patterner left
13:42
Axius joined,
Psyche^ joined,
Psyche^ is now known as Patterner,
tzhs left
13:43
bluescreen joined
13:44
bluescreen is now known as Guest78802
13:45
Kodi joined
|
|||
Kodi | So what exists for typesetting Pod at the moment? | 13:46 | |
Or rather, rendering it. | |||
masak | Kodi: search.cpan.org/~arandal/Pod-Pseudo...eudoPod.pm | ||
that one has DocBook and HTML backends. | 13:47 | ||
Kodi | Excellent. | ||
moritz_ | that's p5 pseudopod | ||
not p6 Po | |||
d | |||
Kodi | Oops. | 13:48 | |
I kept thinking, "why no mention of Perl 6?" | |||
13:48
masonkramer left
|
|||
masak | oh, sorry. you were actually asking about Perl 6 Pod. | 13:48 | |
13:49
masonkramer joined
|
|||
Kodi | Right, otherwise I would have said "POD". | 13:49 | |
masak | right. | ||
guess your best shot is TheDamian's module on CPAN. | |||
moritz_ | it doesn't understand the most uptodate POD spec though | ||
masak | indeed not. | 13:50 | |
then again, nothing out there does. | |||
Kodi: search.cpan.org/~dconway/Perl6-Perl...Perldoc.pm | |||
13:50
Axius left
|
|||
masak | hm, this is probably more apt: search.cpan.org/~dconway/Perl6-Perl.../Parser.pm | 13:50 | |
Kodi | So how do you document your modules usually? Plain text, or use Perl 6 Pod and wait for an appropriate renderer? | 13:51 | |
flussence | rakudo: say [+] (1, * ~ 1 ... *)[^10] | 13:53 | |
p6eval | rakudo : OUTPUT«1234567900» | ||
flussence | rakudo: say [+] (1, * ~ 1 ... *)[^50] | 13:54 | |
p6eval | rakudo : OUTPUT«1.23456790123457e+49» | ||
13:54
thundergnat joined
|
|||
moritz_ | Kodi: exactly | 13:54 | |
or using p5 pod | |||
masak | or the subset of p6 pod that Rakudo supports. | ||
which isn't much. | |||
thundergnat | good * perl6 | ||
Kodi | Good DateTime.now, thundergnat. | 13:55 | |
thundergnat | I was idly looking through RT and came across rt.perl.org/rt3/Public/Bug/Display.html?id=65164 and thought "That looks like LHF!" | 13:56 | |
13:56
phio joined
|
|||
thundergnat | I wrote some infix routines that work correctly but the base ^^ operator seems to be borked. | 13:57 | |
rakudo: say 1 ^^ 1; | |||
p6eval | rakudo : OUTPUT«» | ||
thundergnat | should be Bool::False | ||
rakudo: say 0 ^^ 0; | |||
p6eval | rakudo : OUTPUT«0» | ||
thundergnat | also should be Bool::False | ||
moritz_ | what is ^^ ? | 13:58 | |
thundergnat | Where is ^^ implemented? I couldn't find it. | ||
moritz_ | erm, what's it supposed to be? | ||
thundergnat | exclusive or | ||
moritz_ | why isn't that ?^ then? | ||
we have ~ ? and + versions of all the logic operators | |||
^^ feels wrong | 13:59 | ||
thundergnat | it's in the spec | ||
Kodi | moritz_: But we say && and ||, not ?& and ?|. | ||
thundergnat | github.com/perl6/roast/blob/master/....t#L54-L68 | ||
moritz_ | Kodi: && and ?& have different semantics | ||
thundergnat | Maybe the spec needs to be changed. | ||
moritz_ | ie 1 ?& 3 returns True, 1 && 3 returns 3 | 14:00 | |
Kodi | moritz_: ?& exists? That surprises me. | ||
moritz_ | rakudo: say 1 ?& 3 | ||
Kodi | I see. | ||
p6eval | rakudo : OUTPUT«Bool::True» | ||
moritz_ | github.com/perl6/roast/blob/master/....t#L54-L68 | 14:01 | |
argl | |||
infix:<^^>, short-circuit exclusive-or | 14:02 | ||
$a ^^ $b ^^ $c ... | |||
Returns the true argument if there is one (and only one). Returns Bool::False if all arguments are false or if more than one argument is true. | |||
thundergnat | is ther an echo in here? :-) | ||
moritz_ | sounds like it needs to be implemented with list infix associatvity | ||
thundergnat | Right, Thats what I was doing | ||
moritz_ | thundergnat: just somebody incomepetent in the ways of mixing windows and linux copy&paste | 14:03 | |
thundergnat | heh | ||
no need to explain incompetence to me, I'm an expert in it. :-) | |||
moritz_ | src/Perl6/Grammar.pm | 14:04 | |
1886:token infix:sym<^^> { <sym> <O('%tight_or, :pasttype<xor>')> } | |||
that's wrong | |||
removing the :pasttype<xor> and writing your own two-arg infix:<^^> should fix it | 14:05 | ||
niecza: sub infix:<ADD>($x, $y) { $x + $y }; say 3 ADD 4 | |||
p6eval | niecza f30c13c: OUTPUT«7» | ||
moritz_ | sorear++ | 14:06 | |
14:08
sftp joined
|
|||
thundergnat | our multi sub infix:<^^>(Mu $a, Mu $b) { $a ?? $b ?? Bool::False !! $a !! $b ?? $b !! Bool::False }; say [^^](0,0); | 14:13 | |
masak , belatedly, submits rakudobug | |||
thundergnat | rakudo: our multi sub infix:<^^>(Mu $a, Mu $b) { $a ?? $b ?? Bool::False !! $a !! $b ?? $b !! Bool::False }; say [^^](1,1); | ||
p6eval | rakudo : OUTPUT«Bool::False» | ||
thundergnat | rakudo: our multi sub infix:<^^>(Mu $a, Mu $b) { $a ?? $b ?? Bool::False !! $a !! $b ?? $b !! Bool::False }; say [^^](1,0); | 14:14 | |
p6eval | rakudo : OUTPUT«1» | ||
thundergnat | rakudo: our multi sub infix:<^^>(Mu $a, Mu $b) { $a ?? $b ?? Bool::False !! $a !! $b ?? $b !! Bool::False }; say [^^](1,0,0,5); | ||
14:14
am0c joined
|
|||
p6eval | rakudo : OUTPUT«Bool::False» | 14:14 | |
masak | ah well, let's integrate it into #65164 | ||
thundergnat | rakudo: our multi sub infix:<^^>(Mu $a, Mu $b) { $a ?? $b ?? Bool::False !! $a !! $b ?? $b !! Bool::False }; say [^^](0,6,0,0,0); | ||
p6eval | rakudo : OUTPUT«6» | ||
thundergnat | I don't see why that wouldn't work | 14:15 | |
moritz_ | you'd have to align to code to make it readable :-) | ||
thundergnat | mask: That bug was way before the Bool::False Bool::True return values were implemented | ||
moritz: yeah, this was just to get it into perl6 eval | 14:16 | ||
masak | moritz_: wait, two-arg op? | 14:17 | |
doesn't the infix:<^^> op have listish behaviour? | |||
rakudo: our multi sub infix:<^^>(Mu $a, Mu $b) { $a ?? $b ?? Bool::False !! $a !! $b ?? $b !! Bool::False }; say [^^](1,2,0,3,0); | 14:19 | ||
p6eval | rakudo : OUTPUT«3» | ||
masak | that's wrong. | ||
according to moritz_' quote above. | |||
thundergnat | masak: good point | 14:20 | |
masak | infix:<^^> is *not* two-arg. that's what sets it apart from ?^ | ||
(besides the boolifying thing) | |||
and that might be a reason it's not LHF. then again, it might still be. | 14:21 | ||
thundergnat | I'll have to ponder it a bit, thanks for noticing and pointing that out. | 14:22 | |
masak | 1886:token infix:sym<^^> { <sym> <O('%tight_or, :pasttype<xor>')> } | 14:24 | |
actually, I don't immediately see why this would be wrong. | 14:25 | ||
infix:<^^> is the high-precedence version of infix:<xor>. | |||
moritz_ | because PAST xor doesn't ever return Bool::False, for example | ||
masak | ah, it's PAST xor. | 14:26 | |
that explains it. | |||
14:38
wallberg left
14:42
silug joined
|
|||
thundergnat | rakudo: our multi sub infix:<^^>(Mu $a, Mu *@b) { my $c ||= $a; for (@b) -> $b { return Bool::False if $c && $b; $c ||= $b; }; return $c || Bool::False; } say [^^](0,0,0,5); | 14:45 | |
p6eval | rakudo : OUTPUT«===SORRY!===Confused at line 22, near "our multi "» | ||
thundergnat | rakudo: our multi sub infix:<^^>(Mu $a, Mu *@b) { my $c ||= $a; for (@b) -> $b { return Bool::False if $c && $b; $c ||= $b; }; return $c || Bool::False; }; say [^^](0,0,0,5); | ||
p6eval | rakudo : OUTPUT«5» | ||
thundergnat | rakudo: our multi sub infix:<^^>(Mu $a, Mu *@b) { my $c ||= $a; for (@b) -> $b { return Bool::False if $c && $b; $c ||= $b; }; return $c || Bool::False; }; say [^^](0,0,1,5); | ||
p6eval | rakudo : OUTPUT«Bool::False» | ||
thundergnat | rakudo: our multi sub infix:<^^>(Mu $a, Mu *@b) { my $c ||= $a; for (@b) -> $b { return Bool::False if $c && $b; $c ||= $b; }; return $c || Bool::False; }; say [^^](0,0,0,0); | ||
p6eval | rakudo : OUTPUT«Bool::False» | ||
thundergnat | rakudo: our multi sub infix:<^^>(Mu $a, Mu *@b) { my $c ||= $a; for (@b) -> $b { return Bool::False if $c && $b; $c ||= $b; }; return $c || Bool::False; }; say [^^](1,2,0,3,0); | 14:46 | |
p6eval | rakudo : OUTPUT«3» | ||
thundergnat | Arrgh! | ||
moritz_ | my $c ||= $a | 14:47 | |
takadonet | thundergnat: working on Algorithm::Diff? | ||
moritz_ | uhm | ||
thundergnat | takodanet: not right now, pushed changes over the weekend | 14:48 | |
14:50
mkramer joined
|
|||
takadonet | thundergnat++ | 14:52 | |
all tests passed on my machine | |||
14:53
cls_bsd left
15:01
phio left
15:03
florz left,
florz joined
15:12
Trashlord joined
|
|||
masak | according to uasi, "cause understood, do not know how to fix": twitter.com/uasi/status/11799291387449344 | 15:14 | |
moritz_ | meta operators aren't curried yet? | 15:15 | |
masak | guess not. | ||
moritz_ | rakudo: say * !== 4 | 15:16 | |
p6eval | rakudo : OUTPUT«Can't take numeric value for object of type Whatever in 'Any::Numeric' at line 1418:CORE.setting in 'infix:<==>' at line 7294:CORE.setting in 'negate' at line 122:CORE.setting in main program body at line 1» | ||
colomon | rakudo: say * R- 3 | 15:19 | |
p6eval | rakudo : OUTPUT«Can't take numeric value for object of type Whatever in 'Any::Numeric' at line 1418:CORE.setting in 'infix:<->' at line 7294:CORE.setting in 'reverseargs' at line 130:CORE.setting in main program body at line 1» | ||
colomon | rakudo: my $a = 4 R- 3; say (* R- 3).WHAT | ||
p6eval | rakudo : OUTPUT«Can't take numeric value for object of type Whatever in 'Any::Numeric' at line 1418:CORE.setting in 'infix:<->' at line 7294:CORE.setting in 'reverseargs' at line 130:CORE.setting in main program body at line 1» | ||
colomon | rakudo: my $a = 4 R- 3; say $a; say (* R- 3).WHAT | 15:20 | |
p6eval | rakudo : OUTPUT«-1Can't take numeric value for object of type Whatever in 'Any::Numeric' at line 1418:CORE.setting in 'infix:<->' at line 7294:CORE.setting in 'reverseargs' at line 130:CORE.setting in main program body at line 1» | ||
colomon | huh. wonder where INFIX / PREFIX come from at line 2306 of Actions.pm? | 15:24 | |
That is to say, can I just say INFIX_PREFIX_META_OPERATOR there too? | 15:25 | ||
colomon says JFDI and tries | 15:26 | ||
15:26
kst left,
MayDaniel joined
|
|||
thundergnat | Hmmm. Ok, I'm officially confused. | 15:26 | |
15:26
kst joined
|
|||
thundergnat | rakudo: our sub infix:<q>($a, Mu *@b) {my $c = $a; for (@b) -> $b{say "a $a, b $b, c $c";return Bool::False if $b && $a; };}; say [q](1,2,0); | 15:27 | |
p6eval | rakudo : OUTPUT«a 1, b 2, c 1a Bool::False, b 0, c Bool::False» | ||
thundergnat | Why the heck is $a getting changed? | ||
colomon | it's not | 15:28 | |
moritz_ | infix:q is called multiple times | ||
colomon | It's doing 1 q 2, then Bool::False q 0 | 15:29 | |
thundergnat | Ah, new $a each time. | ||
moritz_ | thundergnat: your chances are better if you define a sub prefix:<[^^]>(*@a) directly | ||
thundergnat | moritz_ yeah I'm starting to realize that. | 15:30 | |
colomon | Adding INFIX_PREFIX_META_OPERATOR to line 2306 of Actions.pm does not seem to help. | ||
where is jnthn++ when you need him? | |||
masak | at $dayjob, most likely. | 15:31 | |
thundergnat | This fruit is not so LH as it looked initially, :-( | ||
mathw | my advent post is now 10 up 3 down on reddit :) | 15:32 | |
takadonet | mathw: it will get more votes soon | ||
moritz_ | masak: research.swtch.com/2010/12/yacc-is-not-dead.html | 15:33 | |
masak | :) | ||
moritz_ | (have only skimmed it so far) | ||
mathw | takadonet: not complaining! I was quite pleased actually | 15:34 | |
takadonet | mathw: i know | ||
ch3ck | godkväll masak \o | 15:35 | |
masak | moritz_: oh, it's Russ Cox, the "ur doin it wrong!" guy. | ||
ch3ck: goder afton, min herre. | |||
ruoso | rakudo site down? | 15:36 | |
masak | moritz_: seems he spends at least half of the post telling people they're doing it wrong. | ||
ruoso: yup. downforeveryoneorjustme.com/http://rakudo.org/ | |||
everyone email alester! :) | |||
15:38
wtw left
|
|||
dalek | tpfwiki: (Herbert Breunung)++ | www.perlfoundation.org/perl6/index...._6_tablets | 15:39 | |
masak | rakudo.org back up. alester++ | 15:45 | |
15:48
plobsing left
15:53
Guest78802 left
15:54
risou joined,
nymacro left
15:55
pmurias joined
|
|||
pmurias | diakopter: hi | 15:56 | |
16:01
PerlJam left
16:02
PerlJam joined
16:03
Kodi left
|
|||
thundergnat | Ok I think I've got it now gist.github.com/730480 Can anyone suggest any tests I should add that might fail? | 16:05 | |
moritz_ | thundergnat: please don't use is() for comparing boolean values - it does string comparison | ||
use ok() for things where you expect True, and nok() for tests where you expect False | 16:06 | ||
thundergnat | I'll do that | ||
moritz_ | and you can use Any instead of $undef | ||
PerlJam wishes there were an Undef sometimes. | 16:07 | ||
(it does read better) | |||
16:09
kst left
16:10
Guest78802 joined
|
|||
masak | PerlJam: I started on a yet-unreleased project lately, and I used Str for the first time in the "undefined value of type Str" sense. it felt... weird. but I don't know yet if it was because I'm unused to it, or whether it's a bad language feature. | 16:17 | |
moritz_ | masak: speaking of which... how many days until your Big Announcement? | ||
masak | four. | ||
and no, that unreleased project is not part of the Big Announcement. :) | 16:18 | ||
moritz_ | but it seems to leave you room for even more projects :-) | ||
masak | heh. why was I even worried that letting you all guess freely would put you on the scent? :P | 16:19 | |
ruoso trying something and failing... | |||
paste.scsys.co.uk/58791 | |||
16:20
kst joined
|
|||
ruoso | I only get undef as .ast | 16:20 | |
moritz_ | ruoso: start with something simple and working, and gradually add more features as you go along, testing each step | 16:21 | |
masak | more to the point, use TDD with grammars. | ||
then you spot regressions when they happen. | |||
moritz_ | oh, and I'd first test if make() works from closures within regexes | ||
masak | ruoso: your script either takes a very long time here, or it's in an infinite loop of some kind. | 16:22 | |
ah, now it output 'Any()'. | |||
moritz_ | ISTR that there was a problem with them; action methods in a separate class work well though | ||
rakudo: 'a' ~~ / a { make 42 } / and say $/.ast | 16:23 | ||
p6eval | rakudo : OUTPUT«Any()» | ||
masak | ruoso: I would recommend not using '|' at this point in Rakudo. it's not properly implemented but instead works like '||', so when Rakudo *does* get it, your code might break. | ||
moritz_ | which would explain the Any | ||
masak | moritz_++ | ||
PerlJam wonders what it would take to get rakudo to understand | properly | 16:24 | ||
moritz_ | PerlJam: just an LTM implementation in nqp-rx | 16:25 | |
PerlJam | "just" | ||
moritz_ | right :-) | ||
sorear built a working LTM engine; it "just" needs to be ported | |||
which reminds me, pmichaud++ announced that he was going to be very productive in December, perl 6 wise | 16:26 | ||
moritz_ hopes that's actually going to happen | |||
masak | when did he announce that? | ||
moritz_ | during a #phasers meeting | ||
16:27
frew_ joined,
frew_ left
|
|||
moritz_ | irclog.perlgeek.de/phasers/2010-11-23#i_3024006 | 16:28 | |
16:29
REPLeffect left
|
|||
masak | oh, that's not long ago at all. yes, I'm hpoing for that too, then. | 16:30 | |
16:31
wooden joined
|
|||
masak | don't know what I'm looking forward to more: pmichaud being very productive, or pmichaud being around more again. | 16:32 | |
takadonet | moritz_: how's are page hits for the advent calendar? | ||
masak: both | |||
masak | takadonet: have you been using junctions lately? :P | ||
16:34
timbunce left
|
|||
takadonet | masak: ..... no | 16:35 | |
:) | |||
masak | just wondering how you could have both of two alternatives being more looked forward to. :) | 16:36 | |
takadonet | heh | ||
16:37
_kaare joined
|
|||
PerlJam | masak: both are more than the unstated 3rd alternative. | 16:38 | |
moritz_ | takadonet: stats are still impressive, 1.5k yesterday, 1.2k today | ||
16:38
pmurias left
|
|||
masak | PerlJam: "being dipped in cold water, repeatedly, while forced to sing 'Happy Birthday to You'"? | 16:39 | |
in that case, yes, both. | |||
ruoso | masak: moritz_: thanks... it works now... the problem was indeed "make" in regex closures... | 16:40 | |
is that a known bug? | |||
masak | think so. | ||
moritz_ | known to me, at least :-) | ||
masak | at least I'm not at all surprised by it. | ||
16:41
timbunce joined
16:42
plobsing joined
|
|||
thundergnat | Ok, I changed the Boolean comparison to use ok/nok, added some more tests and tidied it up a bit. Any suggestions for more tests? gist.github.com/730480 | 16:42 | |
PerlJam | The "long tail" for last years advent calendar posts is interesting. | 16:43 | |
or ... what happened from Apr to Jul? | 16:44 | ||
masak | Rakudo Star didn't get released? | ||
PerlJam | so therefore people were tweeting about the advent calendar a lot causing other people to visit it? And then when R* /was/ released, they slacked off of the advent calendar because there was something new to talk about ? | 16:45 | |
masak has no idea | 16:46 | ||
PerlJam | masak: look at perl6advent.wordpress.com/wp-admin/...p;post=376 | ||
moritz_ | I think the advent calendar was a pretty high google hit for 'rakudo star' | ||
and when it got released, other sites ranked higher for that query | |||
PerlJam | perhaps | ||
masak | PerlJam: that's a weird tail indeed. | 16:47 | |
16:48
justatheory joined,
REPLeffect joined
|
|||
PerlJam | in any case ... hooray for syndication! :) | 16:48 | |
masak | PerlJam: it's odd, the numbers in the table don't seem to agree with the graph. | 16:49 | |
takadonet cannot see that stats page :( | |||
masak | PerlJam: could it be a bug in the graph drawing. | ||
takadonet: no, you have to be a calendar author. | |||
takadonet: (hint, hint) | |||
moritz_ | takadonet: write a post for the advent calendar, then we'll make you an author :-) | ||
takadonet | masak: not a chance | ||
masak | takadonet: why not? just curious. | 16:50 | |
takadonet | masak: I'm a slow writer and got way too much work right now | ||
masak | I can understand those reasons. especially the latter one. | ||
takadonet: though it might come as a surprise that most of the active people in here don't usually complain about having too *little* to do in their non-p6 life. :) | 16:51 | ||
takadonet | masak: I know | 16:52 | |
17:05
wamba joined
|
|||
takadonet | mathw: we got a positive comment :) | 17:05 | |
17:06
cdarroch joined,
cdarroch left,
cdarroch joined
|
|||
masak | "These are kick-ass." \o/ | 17:07 | |
mathw | \o/ | 17:08 | |
daxim | which library is the best backport to Perl5 of an foreach-interator that also gives you the index so you don't have to count manually? | 17:09 | |
masak is not aware of any | 17:11 | ||
rakudo: my @a = <oh lol hai>; for @a.kv -> $index, $value { say "at index $index: $value" } | 17:12 | ||
p6eval | rakudo : OUTPUT«at index 0: ohat index 1: lolat index 2: hai» | ||
takadonet | .... | ||
i love perl6 | |||
masak | :) | ||
takadonet | no more reason for C style loops! | ||
masak | takadonet: back in 2008 or something, I proposed a special form of language construct for looping over both indices and values. I got (a variation of) the above as a reply. | 17:13 | |
plobsing | while (my ($k, $v) = each @array) { say "$k -> $v" } # perl >= 5.12 | ||
masak | plobsing: I thought we agreed not to use &each, ever. why dump more functionality into it? :( | 17:14 | |
plobsing | I'm just saying you can do it with perl5. it's just not quite as pretty. also, I thought while-each was idiomatic. | 17:15 | |
masak | certainly not an idiom that I've adopted. | 17:16 | |
I make wide circles around &each to the point that I often forget that it exists. | |||
17:16
betterworld left,
betterworld joined
|
|||
masak | as a result, my code often works. | 17:16 | |
17:18
shortcircuit joined
|
|||
plobsing | how do you simultaneously iterate over keys and values in perl 5 then? | 17:18 | |
daxim | use Moose::Autobox; [qw(oh lol hai)]->each(sub {say "at index $_[0]: $_[1]"}); | 17:20 | |
that's the least ugly I can make it with one module | |||
I initiated some discussion to get rid of the sub keyword in this circumstance in perl5i | |||
masak | plobsing: in hashes? I iterate over the keys, and then pull out the value inside the loop. | 17:21 | |
daxim | could tie in with named parameters so our underscore friends can go away, too | ||
masak | daxim: I haven't looked much into perl5i, and I know that it's not the goal to turn it into Perl 6, but so far it seems to me to mostly be corroborating the "you can't get there from here" theory about Perl 5 and Perl 6. :) | 17:23 | |
i.e. if you start with Perl 5 and then tweak it, you're not going to get Perl 6, just more (and quite possibly uglier) Perl 5. | |||
daxim | I challenge that theory | 17:24 | |
I retract that statement | |||
masak | :) | ||
daxim: actually, the original quote is from TimToady: "reimplementing insanity is insane" (talking about Perl 5) | 17:25 | ||
justatheory challenges daxim right back | 17:27 | ||
17:29
kjeldahl left
17:31
molaf joined
|
|||
masak | swimming & | 17:33 | |
17:34
masak left
17:38
cls_bsd joined
17:47
impious joined
17:53
envi left
17:59
kjeldahl joined
18:19
MayDaniel left
18:36
dakkar left,
glow left
18:41
finanalyst left
18:45
stkowski joined
18:49
shi left
18:52
tri joined
18:53
impious left
18:58
molaf left
19:06
fhelmberger left
19:11
risou_ joined
19:13
risou left
19:34
lichtkind joined
19:38
_kaare left,
MayDaniel joined
19:42
thundergnat left
19:43
jferrero joined
19:45
MayDaniel left,
daxim left
19:53
_kaare joined
|
|||
sorear | good * #perl6 | 19:56 | |
takadonet | sorear: yo | ||
colomon | \o | 19:59 | |
lichtkind | hai | 20:00 | |
what is ment by quote protection? | 20:01 | ||
moritz_ | context? | ||
lichtkind | << >> | ||
is declared as qw with qiote protection | 20:02 | ||
quote | |||
moritz_ | ah | ||
<<a "b c" d>> returns three items | 20:03 | ||
whereaas <a "b c" d> is 4 items | |||
20:03
y3llow_ joined
|
|||
PerlJam | seems like something the specs could use a little more verbiage on. | 20:04 | |
20:04
pothos_ joined
|
|||
lichtkind | moritz_: thank you | 20:05 | |
20:06
y3llow left,
y3llow_ is now known as y3llow,
pothos left,
pothos_ is now known as pothos
20:07
masak joined
|
|||
jnthn | evening, #perl6 | 20:11 | |
masak | jnthn! \o/ | ||
jnthn | masak! \o/ | 20:12 | |
20:12
risou joined
|
|||
colomon | jnthn: \o/ | 20:13 | |
dalek | tpfwiki: (Herbert Breunung)++ | www.perlfoundation.org/perl6/index...._io_tablet | ||
tpfwiki: (Herbert Breunung)++ | www.perlfoundation.org/perl6/index....ics_tablet | |||
20:13
risou_ left
20:15
molaf joined
|
|||
masak | just saw this: twitter.com/muralichari/status/11852945066827777 | 20:22 | |
couldn't keep myself from replying this: twitter.com/carlmasak/status/11878067303620608 | |||
:) | |||
moritz_ | :-) | 20:23 | |
masak | wonder what an outisder'll make of Yapsi. | 20:24 | |
moritz_ | :-) | 20:25 | |
20:27
masak left
20:33
ggoebel left,
shi joined
20:34
drbean left
20:36
drbean joined,
MayDaniel joined
20:58
mkramer1 joined
20:59
mkramer left
21:02
MayDaniel left
21:07
mkramer joined
21:11
mkramer1 left,
kjeldahl_ left
21:19
icwiener_ joined
21:20
icwiener left
21:32
ggoebel joined
21:36
th0dt joined
21:39
MayDaniel joined
21:46
kjeldahl left
|
|||
[Coke] wonders if he counts as an outsider. | 21:46 | ||
21:49
tri left
|
|||
sorear | [Coke]: depends. What do you think of yapsi? | 21:52 | |
[Coke] | not much. *rim shot* | 21:53 | |
I read the announcements when they come out. they seem to be more humorous than anything else. | |||
PerlJam | Hmm. More humorous than informative? Perhaps masak should dial the humor down a bit then. | 21:55 | |
21:55
th0dt left,
Guest78802 left
|
|||
moritz_ enjoys the humor | 21:56 | ||
sjohnson | seemed fine to me | 21:57 | |
21:57
_kaare left
21:58
ggoebel left,
zby__ left
21:59
dreamcode joined
|
|||
jnthn | Yapsi is a project to produce a funny email one a month, no? ;) | 21:59 | |
PerlJam | "Those Perl 6 guys sure are a funny bunch!" | ||
22:01
zby joined,
donaldh joined
|
|||
[Coke] | jnthn: exactly my thoughts. ;) | 22:04 | |
22:09
zby left,
MayDaniel left
22:11
zby_ joined
22:13
plobsing left
22:15
timbunce left
22:19
spq1 left
22:20
dreamcode left
22:27
ch3ck3r joined
|
|||
diakopter | was there #phasers ? | 22:27 | |
22:31
ch3ck left
22:41
ggoebel joined
|
|||
colomon | isn't #phasers tomorrow? | 22:41 | |
jnthn | aye | 22:42 | |
22:43
wamba left,
ggoebel left
22:49
icwiener_ left
22:50
masak joined
|
|||
masak | ahoy! | 22:50 | |
jnthn | ohay | 22:51 | |
masak | I've written an advent post for tomorrow. | 22:57 | |
jnthn | masak++ | ||
masak | with a bit of luck, I'll even be able to put it up as a draft on wordpress. | ||
but I... have... a bit of a lag right... now... | |||
22:57
plobsing joined
|
|||
jnthn | oh....i.......c. | 22:58 | |
sjohnson | heh | 22:59 | |
masak | whoa! uasi++ seems to have fixed RT #80256: twitter.com/uasi/status/11907116134563840 | ||
anyone want to spectest that patch? | 23:00 | ||
(I could do it later, but if someone can do it now, even better) | |||
also, does it look like a good solution? it looks OK to me, but I'm not too familiar with Actions.pm | 23:01 | ||
jnthn | masak: I fear it may end up auto-currying &infix:<+>(*, 42) | 23:04 | |
masak | jnthn: hm. shouldn't it? | ||
jnthn | I think it'd be a change from current behavior. | 23:05 | |
sorear | hello masak! | 23:08 | |
masak | hi sorear! | 23:09 | |
sorear wonders what an outsider will think of Niecza. | |||
23:15
silug left
|
|||
masak | ok, draft is up. please have a look and see what you think. :) | 23:18 | |
23:22
jhuni joined
|
|||
masak | moritz_++ did the first post that got >1k visitors on a given day. mathw++'s post overtook it, though. | 23:22 | |
23:23
masak left
23:24
masak joined
|
|||
masak | [Coke]: your view on Yapsi worries me a bit. you know there's actual running code in the Yapsi project, right? | 23:24 | |
sorear | masak: so I hear you has a Perl 6 job. | 23:25 | |
masak | sorear: no, I didn't say that. | 23:28 | |
sorear: I said Perl 6 got me a job. | |||
jnthn | Word order is so overrated. | ||
masak | sorear: come January, I'll be working for the same employer as jnthn. | 23:29 | |
sorear: ...and because I've only been doing Perl 6 in the presence of jnthn, that must be what got me hired. :) srsly. | 23:32 | ||
jnthn would have known about masak++ if it wasn't for Perl 6. :) | 23:33 | ||
23:34
sftp left
|
|||
masak | missing "n't"? | 23:34 | |
jnthn | er, yes :) | ||
.oO( Actually, I stalk everyone... ) |
|||
masak | the original reading was interesting too, mind :) | ||
colomon | Apparently my post is the one nobody wants to read. | 23:38 | |
masak | just to be clear: for those who want to read the "Day 7" draft, it's up on perl6advent.wordpress.com/wp-admin/edit.php | ||
(perl6advent.wordpress account required) | |||
23:39
whiteknight joined
23:47
bluescreen joined,
bluescreen is now known as Guest32433
23:59
demolithion left
|