pugscode.org/ | nopaste: sial.org/pbot/perl6 | pugs: [~] <m oo se> (or rakudo:, kp6:, smop: etc.) || We do Haskell, too | > reverse . show $ foldl1 (*) [1..4] | irclog: irc.pugscode.org/
Set by TimToady on 25 January 2008.
00:01 icwiener_ left 00:05 PZt left 00:10 FurnaceBoy left 00:13 Schwern left 00:28 mtrimpe left 00:32 Eevee left 00:35 silug left 00:48 Ara5n joined
meppl good night 00:58
01:00 meppl left 01:02 Jedai left 01:05 Ara4n left 01:47 araujo joined 02:01 Eevee joined 02:06 alanhaggai joined 02:07 stevan_ joined 02:09 Eevee left 02:12 wknight8111 left 02:25 silug joined 02:36 a-jin1 joined, a-jin1 left 02:41 xinming joined 02:50 alanhaggai left 02:54 xinming_ left 02:56 Alias_ left 03:00 xinming_ joined, Alias_ joined 03:05 elmex_ joined 03:09 alester_ joined, alanhaggai_ joined 03:13 xinming left 03:15 xinming joined 03:22 elmex left, elmex_ is now known as elmex 03:23 Ara4n joined, Ara5n left 03:24 sri_work_ left
bacek pugs: sub twice($a) { sub { 2*$a} }; my $t = twice; 03:25
p6eval pugs: OUTPUT[*** ␤ Unexpected "$t"␤ expecting "=", context, ":" or "("␤ at /tmp/HQqGnCOxrn line 1, column 35␤]
bacek pugs: sub twice($a) { sub { 2*$a}; }; my $t = twice;
p6eval pugs: OUTPUT[*** ␤ Unexpected "$t"␤ expecting "=", context, ":" or "("␤ at /tmp/r0sjMRwvW7 line 1, column 36␤]
bacek pugs: sub twice($a) { sub { 2*$a}; }; say twice(5);
p6eval pugs: OUTPUT[<SubRoutine(<anon>)>␤]
bacek pugs: sub twice($a) { sub { 2*$a}; }; say twice(5)->();
p6eval pugs: OUTPUT[*** ␤ Unexpected "->();"␤ expecting ":", term postfix, operator or ","␤ at /tmp/QkbPxRQpru line 1, column 45␤]
bacek pugs: sub twice($a) { sub { 2*$a}; }; say twice(5).();
p6eval pugs: OUTPUT[10␤]
bacek pugs: sub twice($a) { sub { 2*$a}; }; say twice.(5); 03:26
p6eval pugs: OUTPUT[*** Cannot cast from VUndef to Pugs.AST.Internals.VCode (VCode)␤ at /tmp/tn98aF191L line 1, column 37-46␤]
bacek pugs: sub twice($a) { sub { 2*$a}; }; say twice().(5);
p6eval pugs: OUTPUT[*** No compatible multi variant found: "&twice"␤ at /tmp/kWwQ6AAVOE line 1, column 37-48␤]
03:26 xinming_ left
bacek pugs: sub twice($a) { sub { 2*$a}; }; say twice(5).(); 03:26
p6eval pugs: OUTPUT[10␤]
bacek rakudo: sub twice($a) { sub { 2*$a}; }; say twice(5).(); 03:27
p6eval rakudo 29067: OUTPUT[Statement not terminated properly at line 1, near ".();"␤current instr.: 'parrot;PGE::Util;die' pc 120 (runtime/parrot/library/PGE/Util.pir:82)␤]
bacek rakudo: sub twice($a) { sub { 2*$a}; }; say twice(5);
p6eval rakudo 29067: OUTPUT[_block22␤]
bacek pugs: sub twice($a) { sub { 2*$a}; }; my $t = twice(5);
p6eval pugs: RESULT[\sub :(@_) "$_" := "Scalar" #<Scalar:0xb7a529dd>␤ "@_" := "Array" #<Array:0xb7a529d5>␤ "&?ROUTINE" := "Sub" #<Sub:0xb7a062ed>␤ "&?BLOCK" := "Sub" #<Sub:0xb7a062ed> {, "$_" := "Scalar" #<Scalar:0xb7c47f8d>␤ ...
bacek pugs: sub twice($a) { sub { 2*$a}; }; my $t = twice(5); say $t();
p6eval pugs: OUTPUT[10␤]
bacek rakudo: sub twice($a) { sub { 2*$a}; }; my $t = twice(5); say $t(); 03:28
p6eval rakudo 29067: OUTPUT[10␤]
bacek pugs: sub twice($a) { sub { 2*$a}; }; my $t = twice; say $t();
p6eval pugs: OUTPUT[*** ␤ Unexpected "$t"␤ expecting "=", context, ":" or "("␤ at /tmp/SbGCncpbok line 1, column 36␤]
bacek perl6: sub times($a,$b) { $a * $b; }; sub divide($a,$b) { $a / $b; } sub make_op($op) { sub($a,$b) { $op($a,$b) } }; my $t = make_op(&times); say $t(21,2); my $div = make_op(&divide); say $div(42,2); 04:21
p6eval elf 21228: OUTPUT[Parse error in: /tmp/qR2i1rXHIF␤panic at line 1 column 31 (pos 31): Can't understand next input--giving up␤WHERE: ub times($a,$b) { $a * $b; }; sub divide($a,$b) { $a / $b; }␤WHERE: /\<-- HERE␤ STD_red/prelude.rb:99:in `panic'␤ STD_red/std.rb:76:in
.....
..kp6 21228: OUTPUT[error in Block at compiled/perl5-kp6-mp6/lib/KindaPerl6/Grammar/Sub.pm line 362, <> line 1.␤*** Syntax Error in sub '': missing closing curly bracket ␤]
..pugs: OUTPUT[42␤21␤]
..rakudo 29067: OUTPUT[Statement not terminated properly at line 1, near "sub make_o"␤current instr.: 'parrot;PGE::Util;die' pc 120 (runtime/parrot/library/PGE/Util.pir:82)␤]
bacek perl6: sub times($a,$b) { $a * $b; }; sub divide($a,$b) { $a / $b; }; sub make_op($op) { sub($a,$b) { $op($a,$b) } }; my $t = make_op(&times); say $t(21,2); my $div = make_op(&divide); say $div(42,2);
p6eval elf 21228: OUTPUT[/home/evalenv/pugs/misc/STD_red/match.rb:141:in `block in to_dump0': undefined method `to_dump0' for true:TrueClass (NoMethodError)␤ from /home/evalenv/pugs/misc/STD_red/match.rb:140:in `each'␤ from /home/evalenv/pugs/misc/STD_red/match.rb:140:in `map'␤ from
../home/evalenv/pugs/mi...
..kp6 21228: OUTPUT[error in Block at compiled/perl5-kp6-mp6/lib/KindaPerl6/Grammar/Sub.pm line 362, <> line 1.␤*** Syntax Error in sub '': missing closing curly bracket ␤]
..pugs: OUTPUT[42␤21␤]
..rakudo 29067: OUTPUT[42␤84␤]
04:30 eternaleye_ left 04:37 xinming_ joined 04:40 apeiron left, apeiron joined 04:47 xinming_ left 04:50 xinming left 05:02 xinming joined 05:15 alanhaggai_ left 05:17 xinming_ joined 05:30 xinming left 05:36 Psyche^ joined 05:39 a-jin1 joined 05:40 a-jin1 left 05:44 xinming joined 05:50 Patterner left, Psyche^ is now known as Patterner 05:56 xinming_ left 06:03 eternaleye_ joined 06:17 vsoni joined 06:27 alester_ left 06:39 Auzon1 joined, Auzon left 06:40 vsoni left 06:46 planofish left 07:13 vsoni joined, xinming_ joined 07:24 vsoni left 07:26 xinming left 08:17 barney joined 08:26 rindolf joined 08:27 iblechbot joined 08:39 alc joined 09:22 pbuetow joined 09:46 [particle]1 left 09:47 [particle] joined 09:51 Eevee joined 09:57 chris2 joined 10:06 Jedai joined
rakudo_svn r29074 | bernhard++ | [perl6] Fix some POD. 10:07
10:56 riffraff joined 11:04 meppl joined 11:48 barney left 12:14 aindilis left 12:15 aindilis joined 12:32 aindilis left 12:52 riffraff left 13:13 masak joined 13:29 alc left 13:34 silug left 14:04 meppl left 14:38 barney joined
rakudo_svn r29079 | pmichaud++ | [rakudo]: spectest-progress.csv update, 87 files, 1587 passing tests 14:38
14:51 rdice joined 14:52 stevan_ left 15:01 lichtkind joined
lichtkind expression are also evaled when curly braces stand for hashre? 15:01
hashref
15:07 chris2 left
TimToady lichtkind: maybe--we could define { => } as a closure that gets evaluated lazily in hash context; this would be a departure from Perl 5 semantics though 15:11
masak lichtkind: you mean like eval { 'tomatoes' => 'fried green' } ?
lichtkind jes masak
masak my instinct says 'yes', but I'm still trying to parse what TimToady said 15:12
TimToady it would be nice if map { $a => $b } would do what the user expects 15:13
lichtkind TimToady: my question was just if in current perl 6 expr are evaled inside an hash definition
TimToady and I'm trying to answer the "when" of that question
in p5 the expressions are evaluated immediately
I'm saying if we did it lazily, we might be able to finesse the map { $a => $b} problem 15:14
masak TimToady: do you mean my %example = { a => (side_effect1() + side_effect2() }; %example<a> # boom 15:15
TimToady and not decide till it's used whether it was intended for a hash or a function
masak what's the map { $a => $b} problem?
TimToady well, it actually genererally shows up as map { $_ => func($_) } or some such
but people expect it to return a list of pairs, and they get a syntax error instead 15:16
masak ah.
TimToady because to the parser it looks like a hash composer
masak I'm among those people
lichtkind so no full eval inside hash definitions? 15:17
TimToady eh, currently it does full eval; we're speculating
basically it currently adds .() if it looks like a hash composer
lichtkind thanks
15:20 FurnaceBoy joined
TimToady bbl & 15:21
lichtkind thanks masak 15:22
masak lichtkind: np :)
15:22 lichtkind left 15:26 silug joined 15:31 scrottie left, scrottie joined
rindolf Hi TimToady, masak 15:37
TimToady: I'm going out to bike.
masak hiya, rindolf
rindolf Previously I hacked on some Perl code to verify Freecell solutions.
masak my latest Perl adventure was a q&d translation of a Haskell program I was writing, into a Perl 5 one-liner, to understand what the heck was going wrong in the Haskell program :) 15:42
I just don't know how to add spurious print statements to my Haskell code.
15:52 alester_ joined
allbery_b Debug.Trace.trace 15:57
15:57 jhorwitz joined
masak allbery_b: I'll look into that 15:58
I waved around ineffectively in GHCi, and then I resorted to Perl 15:59
it helped, too
masak knows that the limitation is in him, not in Haskell
allbery_b pure functional programming takes some getting used to if you're used to imperative languages 16:05
rindolf Bleh! Could not get out on time. 16:07
Going to half-walk/half-run instead.
Bye all.
masak allbery_b: yes, but I've also found that the results are very beautiful
rindolf: seeya
16:13 FurnaceBoy left 16:21 rdice left 16:37 alanhaggai joined 16:39 masak left 17:06 Auzon1 is now known as Auzon
Auzon Should .perl be in S29 under 'Any'? 17:07
17:08 [particle]1 joined 17:09 barney left 17:11 jan__ left 17:12 jan_ joined 17:16 vsoni joined 17:17 Alias_ left 17:23 [particle] left 17:29 GeJ left 17:31 alanhaggai_ joined, alanhaggai left 17:33 alanhaggai_ is now known as alanhaggai 17:37 slavi1 joined 17:42 GeJ joined 17:57 vsoni left 17:59 vsoni joined 18:00 pmurias joined 18:02 alanhaggai left 18:07 rindolf left
pmurias ruoso: one problem with elf is that STD_red dosn't parse everythin in src-s1p, and the STD based frontend (pixie) is in a very early stage 18:13
slavi1 woot, I got pugs 18:16
18:36 [particle]1 left 19:00 vsoni left 19:13 vsoni joined 19:23 gbacon left
pmurias ruoso: ping 19:38
19:49 alester_ left 19:57 stevan_ joined 19:59 Alias_ joined 20:04 slavi1 left 20:07 vsoni left
pmurias TimToady: what is an acceptable to you way of me adding the rule start extraction to gimme5? 20:11
should i add an option or check an env var?
20:17 xinming joined 20:19 Alias_ left, Alias_ joined 20:25 jferrero joined 20:27 xinming_ left 20:32 jferrero left
pmurias TimToady: or is it usefull for something else and i should spit out the info in a particular way? 20:32
20:33 jferrero joined 20:38 pmurias left 20:57 pbuetow left 21:03 jferrero left 21:09 jferrero joined 21:29 jferrero left 21:40 webar7 joined
webar7 I saw a person with a tshirt in toronto that said: perl6 != ";" 21:40
what does that mean
does perl6 no require ; or something?!
at yonge and dundas 21:41
oh well
21:42 webar7 left 21:49 pbuetow joined 22:04 FurnaceBoy joined 22:06 jferrero joined 22:21 pbuetow left, pbuetow joined 22:56 vsoni joined
ingy I think that would mean "perl6 is not finished" 23:09
23:15 FurnaceBoy left 23:32 vsoni left 23:36 eternaleye_ left, eternaleye_ joined
Alias_ ingy: I can't use private message on this network 23:46
vixey Alias_: /msg nickserv help register 23:47
23:49 mjk joined 23:50 iblechbot left
Alias_ blah 23:51