perl6-projects.org/ | nopaste: sial.org/pbot/perl6 | evalbot: 'perl6: say 3;' | irclog: irc.pugscode.org/ Set by mncharity on 25 March 2009. |
|||
00:09
PerlPilot joined
00:19
bacek_ joined
00:20
mikehh joined,
PerlPilo1 joined
00:22
rob joined,
PerlJam left,
dduncan joined
00:29
nacho left
00:33
PerlPilot left,
justatheory joined
|
|||
bacek_ | hi again | 00:33 | |
mberends: gist.github.com/86988 "pure" perl6 example of http client. Requires latest parrot :) | 00:37 | ||
00:37
justatheory left
00:53
cspencer joined
|
|||
pmichaud | bacek++ # niiiice http client | 00:58 | |
00:58
mberends joined
|
|||
mberends | bacek: good $your_time, getting latest parrot :) | 01:03 | |
bacek++: v.nice client indeed :) | 01:06 | ||
skids | rakudo: my @b; @b[1] = 0; @b.say | 01:07 | |
p6eval | rakudo 9fa0fc: OUTPUT«Use of uninitialized value0» | ||
skids | rakudo: my @b; @b[1] = 0; @b.perl.say | ||
p6eval | rakudo 9fa0fc: OUTPUT«Null PMC access in isa()current instr.: 'parrot;List;!flatten' pc 5960 (src/classes/List.pir:227)» | ||
pmichaud | skids: yes, there's a bug there (already reported in RT) | 01:09 | |
skids | thanks. | ||
01:10
mikehh left
|
|||
mberends | yes! Rakudo on Parrot r37783 sends/receives on TCP sockets! # bacek++ | 01:11 | |
skids | let the nefariousness commence! :-) bacek++ | 01:12 | |
mberends | Internet beware - Perl 6 is online! | 01:13 | |
01:17
amoc left
01:22
awwaiid left
01:25
hercynium joined
01:29
eternaleye joined
|
|||
dduncan | something I'm wondering in general, has Rakudo caught up to Pugs in functionality and if not then what are the major differences ... or is this written somewhere ... maybe comparative smokes? | 01:30 | |
or is it ahead in places? | |||
I'm guessing big number support is one difference based on GSOC entries | 01:31 | ||
mberends | dduncan: mostly, details change too rapidly to document, Rakudo is ahead on regexen for example. | 01:32 | |
dduncan | or a separate question, is there any documentation for Rakudo specifically that says in broad strokes what features of the specced Perl 6 it implements and which it doesn't? | 01:33 | |
ascent_ | bacek++ # very nice. | ||
ibm-- # for epKe-Alive header. | |||
dduncan | I have seen changelogs that see what was added between releases | ||
but I didn't see a "where we are now" summary | 01:34 | ||
unless the test suite is that summary | |||
mberends | dduncan: www.rakudo.org/status | ||
dduncan | than youk | ||
mberends | :) | 01:35 | |
it's amazing what can already be done by current Rakudo :) | 01:37 | ||
01:37
rob left
01:38
DemoFreak left
|
|||
cspencer | perl6: say chars("abcdef" > 4) | 01:45 | |
p6eval | rakudo 9fa0fc: OUTPUT«1» | ||
..elf 26016: OUTPUT«Argument "\x{61}\x{62}..." isn't numeric in numeric gt (>) at (eval 125) line 3.Undefined subroutine &GLOBAL::chars called at (eval 125) line 3. at ./elf_h line 5863» | |||
..pugs: OUTPUT«0» | |||
cspencer | what should the answer be in this case? it's a test in S32-str/length.t supposedly checking char's precedence | 01:46 | |
perl6: say ("abcdef" > 4) | 01:47 | ||
p6eval | elf 26016: OUTPUT«Argument "\x{61}\x{62}..." isn't numeric in numeric gt (>) at (eval 124) line 3.» | ||
..rakudo 9fa0fc: OUTPUT«0» | |||
..pugs: OUTPUT«» | |||
01:55
japhb joined
01:59
nihiliad joined
02:00
justatheory joined
|
|||
pugs_svn | r26017 | putter++ | [elfish/showcode] Updated from elf_f to elf_h, and unbroke the build. | 02:04 | |
r26017 | putter++ | The Makefile is much simpler with elf_h. The build has been broken unnoticed since 2008-06? | |||
02:05
Whiteknight left
02:08
FurnaceBoy joined,
Tene_ joined
02:13
mikehh joined
02:21
Tene left
02:23
dKingston left
|
|||
meppl | good night | 02:27 | |
02:27
meppl left
02:28
kate21de1 left
02:40
SamB left
02:43
SamB joined
03:07
FurnaceBoy left
03:14
cspencer left
03:17
dduncan left
03:21
justatheory left
03:38
drbean left,
Kisu left
03:41
drbean joined
|
|||
mberends | @tell masak proto haz nu hello n conf - plz tri | 04:03 | |
lambdabot | Consider it noted. | ||
04:03
mberends left
04:06
justatheory joined
04:14
orafu left,
OuLouFu joined,
OuLouFu is now known as orafu
04:18
drbean left
04:28
Kisu joined
05:05
hercynium left
05:08
eternaleye left
05:10
kimtaro_ joined
05:18
kimtaro left
05:22
nihiliad left
05:40
justatheory left
06:23
mjk joined
06:34
finanalyst joined
|
|||
finanalyst | morning. I am having a problem making lastest parrot to run with rakudo. Can anyone help? | 06:35 | |
06:36
alanhaggai joined
06:37
orafu left,
OuLouFu joined,
OuLouFu is now known as orafu
06:41
kate21de joined
07:08
plu_ is now known as plu
07:22
amoc joined
07:26
bacek_ left
|
|||
amoc | rakudo: ok((not ("-a-" ~~ rx:P5/\Ba\B/)), 're_tests 127 (157)'); | 07:35 | |
p6eval | rakudo 9fa0fc: OUTPUT«Could not find non-existent sub okcurrent instr.: '_block14' pc 100 (EVAL_17:48)» | ||
amoc | rakudo: (not ("-a-" ~~ rx:P5/\Ba\B/)) | ||
p6eval | rakudo 9fa0fc: RESULT«Bool::True» | ||
amoc | rakudo: (<a ab>, <bc ad ba>).comb(m:Perl5/\S*a\S*/) | 07:38 | |
p6eval | rakudo 9fa0fc: RESULT«["a", "ab", "ad", "ba"]» | 07:39 | |
amoc | '~'?! it's strange that i just completely recompiled rakudo, and spectests are failed. | 07:40 | |
which has passed with ALL OK before. | 07:41 | ||
07:45
jhuni joined
07:56
DemoFreak joined
08:07
szabgab joined
08:28
drbean joined
08:49
masak joined
08:54
amoc left,
amoc joined
09:00
protorom joined
09:01
protorom left
09:02
pmurias joined
09:04
alanhaggai left,
Kisu left
09:14
mj41 left
09:16
schmalbe joined
09:38
kanru left,
pmurias left
09:43
mjk left
09:54
orafu left,
OuLouFu joined
09:55
jhuni left
10:02
amoc left
10:20
mjk joined
10:34
ludan joined
|
|||
ludan | hi | 10:34 | |
masak | hello, ludan. | 10:35 | |
lambdabot | masak: You have 1 new message. '/msg lambdabot @messages' to read it. | ||
masak | @messages | ||
lambdabot | mberends said 6h 31m 47s ago: proto haz nu hello n conf - plz tri | ||
masak tris | |||
mberends: cool. will review on the train I'm about to catch in a few minutes. :) | 10:37 | ||
10:40
masak left
10:45
amoc joined
10:49
jan_ left
10:50
jan_ joined
10:57
cognominal left
11:01
kanru joined
|
|||
mikehh | rakudo (9fa0fca) builds on parrot r37794 - make test/make spectest PASS - Ubuntu Intrepid Amd64 | 11:09 | |
11:11
riffraff joined,
amoc left,
pmurias joined
11:13
amoc joined
11:19
Cybera left
11:30
schmalbe left
11:32
sbp joined
|
|||
sbp | hey. I'm trying to install Rakudo perl6 on OS X 10.4. I've got as far as installing ICU and trying to install Parrot, but I get a stupid error that's apparently connected with XCode that I can't resolve | 11:32 | |
so I'm wondering a) whether to continue trying to resolve that problem, which is pretty architecture specific, or b) trying to install perl6 via an alternative route. what would people here suggest? | 11:33 | ||
(I should note that I pretty much just followed the directions on the best sites I could find to get a decent perl6 installation working) | |||
11:35
riffraff left
11:38
kane_ joined
11:44
mberends joined,
mberends_ joined,
mberends_ left
|
|||
mjk | @message | 11:44 | |
lambdabot | Maybe you meant: messages messages? | ||
mjk | no, i test how to get message | 11:45 | |
mberends | sbp, quite a few developers here use OSX, but they're away right now. ask again when it's busier. | ||
sbp | mberends: great, thanks | 11:47 | |
I'm currently trying parrot from svn, just in case that helps | |||
per perlgeek.de/blog-en/perl-6/where-ra....writeback | 11:48 | ||
mberends | lunch & bbiab | 11:53 | |
sbp | same error. for the record: | 11:54 | |
/usr/bin/libtool: for architecture cputype (16777223) cpusubtype (3) object: /usr/local/lib/libgcc_s.10.4.dylib malformed object (unknown load command 4) | |||
gmake: *** [blib/lib/libparrot.1.0.0.dylib] Error 1 | |||
(which I think is an XCode thing, but the latest XCode is Leopard only) | |||
11:54
cseong joined
12:01
kanru left
12:03
meppl joined
12:04
rob joined
12:05
rob left
12:06
rob joined
12:17
mjk left
12:35
pmurias left
|
|||
finanalyst | if i write a set of rules and place them in a grammar, do i 'use' the grammar to get access to the rules? | 12:37 | |
12:37
orafu joined
|
|||
mberends | finanalyst, your can either ~~ (smartmatch) individual rules/regexen within the grammar, or .parse the grammar, which then starts with regex/rule TOP. afaik, works here. | 12:40 | |
finanalyst | trying | 12:44 | |
mberends | finanalyst, github.com/mattw/form/blob/master/t...eactions.t for .parse() or github.com/eric256/perl6-examples/b.../Parser.pm for smartmatch (using given/when). | 12:45 | |
12:46
Whiteknight joined
12:47
kane_ left
12:48
OuLouFu left
12:49
kane_ joined
12:51
hisso joined
12:54
mikehh left,
mikehh joined
|
|||
mberends | finanalyst, nice example line 117 in github.com/viklund/november/blob/ma...diaWiki.pm | 12:57 | |
13:02
pmurias joined
13:06
kane_ left,
kanru joined
13:11
justatheory joined
|
|||
finanalyst | mberends: thank you | 13:13 | |
trying to find the difference between a 'rule' and a 'token' | |||
mberends | finanalyst, S05:1926 | 13:20 | |
token means regex :ratchet { ... } and rule means regex :ratchet :sigspace { ... } | 13:27 | ||
13:32
Whiteknight left
|
|||
finanalyst | what is the perl6 equivalent of the perl5 \&subroutine? I tried &name and just name | 13:32 | |
13:36
justatheory left
|
|||
skids | &subname should work, as long as there are no parens. | 13:38 | |
But you may want to make a closure depending on how you are using it. | 13:39 | ||
finanalyst | i am trying to compose a pair 'description' => &subname except that subname seems to be called when the pair is being composed | 13:42 | |
13:44
ludan left
13:46
rob left
13:50
kimtaro joined
13:58
FurnaceBoy joined
13:59
kane_ joined
|
|||
pmichaud | finanalyst: the equivalent is &subname | 14:00 | |
14:03
orafu left,
OuLouFu joined,
Alias joined
14:08
dKingston joined
|
|||
finanalyst | perl6: my %a=('list'=>&listsub,'exit'=>sub {exit}); say %a.perl; sub list {say 'listing'} | 14:10 | |
p6eval | pugs: OUTPUT«***  Unexpected "%a" expecting "=", "::", signature value, context, ":" or "(" Variable "&listsub" requires predeclaration or explicit package name at /tmp/2ata96czV9 line 1, column 4» | ||
..rakudo 9fa0fc: OUTPUT«listingget_iter() not implemented in class 'Integer'current instr.: 'parrot;Perl6Array;!STORE' pc 6774 (src/classes/Array.pir:251)» | |||
..elf 26017: 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... | |||
14:11
kimtaro_ left
|
|||
finanalyst | std:my %a=('list'=>&listsub,'exit'=>sub {exit}); say %a.perl; sub list {say 'listing'} | 14:11 | |
rakudo:my %a=('list'=>&listsub,'exit'=>sub {exit}); say %a.perl; sub list {say 'listing'} | 14:12 | ||
rakudo: my %a=('list'=>&listsub,'exit'=>sub {exit}); say %a.perl; sub list {say 'listing'} | |||
p6eval | rakudo 9fa0fc: OUTPUT«listingget_iter() not implemented in class 'Integer'current instr.: 'parrot;Perl6Array;!STORE' pc 6774 (src/classes/Array.pir:251)» | ||
finanalyst | rakudo: my $a=&list; say $a.perl; say $a(); sub list {say 'listing' } | 14:13 | |
p6eval | rakudo 9fa0fc: OUTPUT«listingget_iter() not implemented in class 'Integer'current instr.: 'parrot;Perl6Array;!STORE' pc 6774 (src/classes/Array.pir:251)» | ||
14:14
hisso left
|
|||
finanalyst | pmichaud: the line i just sent to rakudo evalbot did not work, but it works with REPL on my computer | 14:15 | |
std: my %a=('list'=>&listsub,'exit'=>sub {exit}); say %a.perl; sub list {say 'listing'} | 14:17 | ||
p6eval | std 26017: OUTPUT«ok 00:03 49m» | 14:18 | |
finanalyst | rakudo: say 'hi' | ||
p6eval | rakudo 9fa0fc: OUTPUT«hi» | ||
finanalyst | rakudo: my $a=&list; say $a.perl; say $a(); sub list {say 'listing' } | ||
p6eval | rakudo 9fa0fc: OUTPUT«listingget_iter() not implemented in class 'Integer'current instr.: 'parrot;Perl6Array;!STORE' pc 6774 (src/classes/Array.pir:251)» | 14:19 | |
14:20
hercynium joined
|
|||
finanalyst | rakudo: my $a=&foo; say $a.perl; say $a(); sub foo {say 'listing' } | 14:23 | |
p6eval | rakudo 9fa0fc: OUTPUT«{ ... }listing1» | ||
finanalyst | rakudo: my %a=('list'=>&listsub,'exit'=>sub {exit}); say %a.perl; sub listsub {say 'listing'} | 14:24 | |
p6eval | rakudo 9fa0fc: OUTPUT«{"list" => { ... }, "exit" => { ... }}» | ||
finanalyst | rakudo: my %a=('list'=>&listsub,'exit'=>sub {exit}); say %a.perl; sub listsub {say 'listing'}; %a{list}() | ||
p6eval | rakudo 9fa0fc: OUTPUT«{"list" => { ... }, "exit" => { ... }}invoke() not implemented in class 'ResizablePMCArray'current instr.: '_block14' pc 186 (EVAL_17:61)» | ||
finanalyst | rakudo: my %a=('list'=>&listsub,'exit'=>sub {exit}); say %a.perl; sub listsub {say 'listing'}; %a{'list'}() | 14:27 | |
p6eval | rakudo 9fa0fc: OUTPUT«{"list" => { ... }, "exit" => { ... }}listing» | ||
finanalyst | rakudo does not like subs named 'list' | ||
14:28
hercynium left
14:30
kane_ left
14:31
Alias left,
Alias_ joined
|
|||
skids | "list" is an operator | 14:32 | |
14:33
kane_ joined
14:39
kimtaro left
|
|||
dalek | kudo: 7af829f | pmichaud++ | docs/spectest-progress.csv: spectest-progress.csv update: 339 files, 7804 passing, 0 failing |
14:48 | |
sbp | okay, I've decided to take a different tack | 14:52 | |
14:52
kane_ left,
Alias_ left
|
|||
sbp | because none of the million ways that I tried to fix my libtool / glibtool situation works | 14:52 | |
so now I'm going to install the MacPorts parrot... | 14:53 | ||
and then find some way to get the .git of rakudo to use that | |||
(don't ask me how) | |||
14:53
Alias joined
14:57
rgs left
14:58
khisanth_ joined
15:02
kane_ joined
|
|||
finanalyst | rakudo: rule findatab { '<' ~ '>' tab }; my $a='<tab>'; say ?($a~~/<findatab>/) | 15:05 | |
p6eval | rakudo 7af829: OUTPUT«Unable to parse findatab, couldn't find final '>'current instr.: 'parrot;PGE;Match;FAILGOAL' pc 2927 (compilers/pge/PGE/Regex.pir:456)» | ||
finanalyst | what is wrong with my rule? | 15:06 | |
15:06
cseong left
15:09
kane_ left,
rgs joined,
Alias left,
Alias_ joined
15:10
Khisanth left
|
|||
mberends | rakudo: rule findatab { '<' tab '>' }; my $a='<tab>'; say ?($a~~/<findatab>/) | 15:13 | |
p6eval | rakudo 7af829: OUTPUT«1» | ||
mberends | what was your ~ doing there ? | ||
sbp | okay, I filed a bug to MacPorts: | 15:16 | |
trac.macports.org/ticket/19024 | |||
— parrot-1.0.0 fails to install due to libtool | 15:17 | ||
15:17
khisanth_ left
|
|||
mberends | sbp: good idea. is it right to guess you use a PPC processor, not an Intel? | 15:18 | |
sbp | nope, Intel | 15:19 | |
it's a 2006 MacBook | 15:20 | ||
finanalyst | mberends: The ~ operator is a helper for matching nested subrules with a specific terminator as the goal. S05 | ||
15:20
kane_ joined
15:22
xinming left,
xinming joined
|
|||
pmichaud | rakudo: rule findatab { '<' ~ '>' 'tab' }; my $a = '<tab>'; say ?($a~~/<findatab>/) | 15:25 | |
p6eval | rakudo 7af829: OUTPUT«1» | ||
pmichaud | note that tab !== 'tab' | ||
finanalyst | why??? | ||
pmichaud | tab* matches tabbbbbbb | 15:26 | |
'tab'* matches tabtabtabtab | |||
so '<' ~ '>' tab matches <t> | |||
actually, <t>ab | |||
finanalyst | ahhh | ||
rule findatab { '<' ~ '>' 'tab' .* }; my $a = '<tab stuff>'; say ?($a~~/<findatab>/) | 15:33 | ||
rakudo: rule findatab { '<' ~ '>' 'tab' .* }; my $a = '<tab stuff>'; say ?($a~~/<findatab>/) | 15:34 | ||
p6eval | rakudo 7af829: OUTPUT«Unable to parse findatab, couldn't find final '>'current instr.: 'parrot;PGE;Match;FAILGOAL' pc 2927 (compilers/pge/PGE/Regex.pir:456)» | ||
pmichaud | if you want 'tab' plus other stuff in the brackets, you need | 15:35 | |
'<' ~ '>' [ tab .* ] | |||
finanalyst | rakudo: rule findatab { '<' ~ '>' [tab .*] }; my $a = '<tab stuff>'; say ?($a~~/<findatab>/) | 15:36 | |
p6eval | rakudo 7af829: OUTPUT«Unable to parse findatab, couldn't find final '>'current instr.: 'parrot;PGE;Match;FAILGOAL' pc 2927 (compilers/pge/PGE/Regex.pir:456)» | ||
pmichaud | oh. | 15:37 | |
the .* won't work because it's ratcheted | |||
rakudo: rule findatab { '<' ~ '>' [tab .*] }; my $a = '<tab stuff>'; say ?($a~~/<findatab>/) | |||
rakudo: rule findatab { '<' ~ '>' [tab .*!] }; my $a = '<tab stuff>'; say ?($a~~/<findatab>/) | |||
p6eval | rakudo 7af829: OUTPUT«Unable to parse findatab, couldn't find final '>'current instr.: 'parrot;PGE;Match;FAILGOAL' pc 2927 (compilers/pge/PGE/Regex.pir:456)» | ||
pmichaud | rakudo: rule findatab { '<' ~ '>' [tab .*!]! }; my $a = '<tab stuff>'; say ?($a~~/<findatab>/) | ||
p6eval | rakudo 7af829: OUTPUT«Syntax error at line 1, near "}; my $a "current instr.: 'parrot;PGE;Util;die' pc 129 (runtime/parrot/library/PGE/Util.pir:83)» | ||
pmichaud | hmmmm. | 15:38 | |
rakudo: rule findatab { '<' ~ '>' [tab .*!]:! }; my $a = '<tab stuff>'; say ?($a~~/<findatab>/) | |||
p6eval | rakudo 7af829: OUTPUT«Unable to parse findatab, couldn't find final '>'current instr.: 'parrot;PGE;Match;FAILGOAL' pc 2927 (compilers/pge/PGE/Regex.pir:456)» | ||
pmichaud | rakudo: rule findatab { '<' ~ '>' [ tab <-[>]>* ] }; my $a = '<tab stuff>'; say ?($a~~/<findatab>/) | ||
p6eval | rakudo 7af829: OUTPUT«1» | ||
pmichaud | okay, that's better. | ||
finanalyst | what is the <-[>]>* and why is .* not possible? | 15:40 | |
pmichaud | <-[>]> matches zero or more characters that aren't '>' | 15:41 | |
(er, <-[>]>* ...) | |||
.* isn't possible because it doesn't backtrack | |||
finanalyst | ok now i see. | ||
pmichaud | it would be the same problem with | ||
'<' [ tab .* ] '>' | |||
we'd never match the final '>', because the .* would have already matched it. | 15:42 | ||
15:42
kane_ left
|
|||
pmichaud | (no backtracking in rules or tokens) | 15:42 | |
finanalyst | rakudo: regex findatab {'<' ~ '>' [tab .*]}; say ?('<tab stuff>'~~/<findatab>/) | 15:44 | |
p6eval | rakudo 7af829: OUTPUT«Unable to parse , couldn't find final '>'current instr.: 'parrot;PGE;Match;FAILGOAL' pc 2927 (compilers/pge/PGE/Regex.pir:456)» | ||
finanalyst | regex has no backtracking? | ||
pmichaud | regex does, but goal regexes have some odd semantics. | ||
unless S05 has changed, the way it's defined it somewhat implies a "no backtrack" on the internal expression. | 15:45 | ||
although I think I was supposed to change it. Let me review the logs. | 15:46 | ||
yes, I was supposed to change it. I'll do that today. (irclog.perlgeek.de/perl6/2009-01-14#i_832617) | 15:48 | ||
15:51
Tene joined
15:55
khisanth_ joined
16:04
dKingston left,
Tene_ left
16:15
cognominal joined
16:16
khisanth_ left
|
|||
pmichaud | std: my @a; @a.grep { $_ < 3 }; | 16:27 | |
p6eval | std 26017: OUTPUT«##### PARSE FAILED #####Unexpected block in infix position (two terms in a row, or previous statement missing semicolon?) at /tmp/983T8OAeCQ line 1:------> my @a; @a.grep { $_ < 3 }; expecting any of: infix or meta-infix infix stopper standard | ||
..stopper ter... | |||
16:34
msmatsko left,
bigpresh left
16:35
bigpresh joined,
bigpresh is now known as Guest25865
16:46
Psyche^ joined
16:47
Patterner left,
Psyche^ is now known as Patterner
16:52
Khisanth joined
16:59
ejs joined
17:02
Limbic_Region joined
17:03
msmatsko joined
17:19
Limbic_Region left
17:21
jhorwitz joined
17:27
M_o_C joined,
Alias_ left,
Alias_ joined
|
|||
literal | where's masak these days? | 17:31 | |
diakopter | @seen masak | 17:32 | |
lambdabot | I saw masak leaving #perl6 6h 51m 31s ago, and . | ||
literal | mberends: what's the status of your Perl 6 Pod::Parser? | 17:34 | |
17:47
kate21de left
|
|||
mberends | literal: most recently I built it in into a local webserver that can render any Pod file on your local drive. It handles common Pod 5 as well. planetsix.perl.org/ currently talks about it. Install github.com/eric256/perl6-examples/tree/master and give it a try :) | 17:50 | |
literal | mberends: I was wondering how useful it would be for this: groups.google.com/group/tpf-gsoc-st...09fa51e4e3 | 17:52 | |
mberends | literal: great! this code would be quite usable for that, and the workout will stimulate more development. | 17:54 | |
literal | ok, great | ||
maybe you could reply to that post? | |||
mberends | must create a Google account first, then yes, I'll reply. | 17:56 | |
szabgab | what is the nick of Hinrik ? | 17:59 | |
ah literal :-) | |||
hi | 18:00 | ||
18:00
Guest25865 is now known as bigpresh
|
|||
literal | heh | 18:01 | |
szabgab | so I was wondering what should I write as a sample plugin in Perl 6 | ||
is there any code of psi already somewhere ? | |||
18:05
sbp left
18:06
lisppaste3 left
|
|||
literal | don't think so | 18:06 | |
maybe masak has written something | |||
mberends | szabgab, literal: recently masak has been concentrating on Web.pm | 18:10 | |
literal | ok | 18:11 | |
18:11
sbp joined
18:13
PZt left
18:17
Alias_ left
18:18
dKingston joined
18:20
lisppaste3 joined
18:43
SamB left
|
|||
mberends | literal: replied. Just seeing if I can run up a server daemon for you to browse... | 18:48 | |
18:49
rindolf joined
|
|||
mberends | literal: for example, 10.31.13.56:8080/home/rakudo/rakudo...etting.pod and the rest of the dirs/files, only the port is actually 2080 so that bots cannot follow the link. | 19:00 | |
cj | mberends: erhm, bots can't follow it any, since nobody will route 10/8 :) | 19:01 | |
19:01
ejs left
|
|||
mberends | :/ | 19:01 | |
cj | anyway* | ||
mberends | autoexec.demon.nl:8080/home/rakudo/...etting.pod | 19:02 | |
literal | nice | 19:07 | |
mberends | that's from Pod 5 source, whilst it's a Pod 6 parser :) | ||
literal | yeah | 19:08 | |
can you show me how it renders S26-documentation.pod ? | 19:09 | ||
mberends searches... | |||
szabgab | mberends, is that slow or just does not like me personally ? | 19:10 | |
19:11
ejs joined
|
|||
literal | the initial loading was slow here as well | 19:11 | |
mberends | it's not you ;) it is slow indeed. and that for a stream-based parser is worrying. | ||
szabgab, literal: performance measurements gist.github.com/83138 | 19:15 | ||
19:16
SamB joined
|
|||
szabgab | timed out for me | 19:16 | |
mberends | :( | 19:17 | |
S26 is about 70K, so a time of 5-10 minutes is expected. Currently I'm looking to replace the stream-based with a tree-based parser in the hope that the regex engine's inner loops are faster than Rakudo's outer loops. | 19:20 | ||
19:21
orafu joined
|
|||
mberends | ah. S26 finished here after some 5 minutes with the output truncated to the first 1k or so of xhtml. | 19:22 | |
19:25
SamB left
|
|||
literal | heh | 19:27 | |
mberends | 'make test' was taking about 50 seconds for 47 small documents in January, but lately has risen to about 150 seconds. | ||
literal | is that due to changes in Rakudo/Parrot or Pod::Parser? | 19:28 | |
mikehh | how about make spectest without threading - it was about 15mins - now about 35 for me :-{ | 19:30 | |
mberends | Probably the former, Pod::Parser didn't change significantly. There has been some discussion about performance in #perl6 and #parrot. | ||
mikehh | ok there are a few more tests - but still | ||
19:32
SamB joined
|
|||
mberends | 12K, just over a minute: ...:/home/rakudo/pugs/docs/Perl6/Spec/S28-special-names.pod | 19:35 | |
19:36
OuLouFu left
|
|||
mberends | that last request took 297M RAM and 67 secs | 19:39 | |
literal | that's quite a bit | 19:40 | |
looks like it didn't parse the whole document though | 19:41 | ||
19:41
hercynium joined
|
|||
literal | this one is longer: perlcabal.org/syn/S28.html | 19:41 | |
mberends | the same final sentences... | 19:42 | |
literal | hm? | 19:43 | |
19:45
dduncan joined
|
|||
mberends | the content appears to match, just the markup style differs. | 19:45 | |
unless you had a timeout :/ | 19:46 | ||
literal | what do you mean? your parse ends right before the "Perl5 to Per6 special variable translation" | ||
I tried reloading the page and I get the same output | |||
mberends | the browser here goes right to the end from both URLs | 19:47 | |
literal | odd | ||
mberends | flaky-- | ||
szabgab | rakudo: say q(abc) | 19:53 | |
p6eval | rakudo 7af829: OUTPUT«abc» | ||
szabgab | rakudo: say q(ab(c)d) | ||
p6eval | rakudo 7af829: OUTPUT«Statement not terminated properly at line 1, near "d)"current instr.: 'parrot;PGE;Util;die' pc 129 (runtime/parrot/library/PGE/Util.pir:83)» | ||
literal | rakudo: say xABfoo #[bar] bazxBB | 19:54 | |
p6eval | rakudo 7af829: OUTPUT«say requires an argument at line 1, near " \ufffdfoo #[ba"current instr.: 'parrot;PGE;Util;die' pc 129 (runtime/parrot/library/PGE/Util.pir:83)» | ||
literal | rakudo: say <foo #[bar] baz> | ||
p6eval | rakudo 7af829: OUTPUT«foo#[bar]baz» | ||
19:57
ZuLuuuuuu joined
20:01
lucs_ joined
|
|||
lucs | Can I play with rakudo evaluations in a private channel? | 20:02 | |
20:04
rindolf left,
rindolf joined
|
|||
diakopter | lucs: I don't think p6eval is set up for that, but I imagine that wouldn't be too difficult of a change... | 20:05 | |
oh look, it is | |||
/msg p6eval rakudo: say "hi" | 20:06 | ||
lucs | Excellent! Thanks. | ||
diakopter | moritz_++ and whoever else | 20:11 | |
20:11
orafu left
20:12
OuLouFu joined
|
|||
szabgab | literal, Padre::Plugin::PSI was uploaded to CPAN | 20:13 | |
literal | nice! | ||
szabgab | of course it only counts the characters in your current file, but it does so in Perl 6 | ||
literal | that's a start :) | 20:14 | |
20:20
mikehh left
|
|||
sbp | okay, for anyone following my Rakudo Saga earlier, I managed to resolve it by getting Xcode 2.5 from connect.apple.com/cgi-bin/WebObject...leID=19907 and then using the following installation method: | 20:22 | |
$ git clone git://github.com/rakudo/rakudo.git | 20:23 | ||
$ cd rakudo && perl Configure.pl --gen-parrot | |||
$ gmake | |||
quite simple really | |||
thanks for the encouragement | |||
20:23
sbp left,
rindolf left
|
|||
szabgab | literal, do you have a web site or a blog I can link to ? | 20:26 | |
literal | blog.nix.is | ||
szabgab | thanks, journaled | 20:37 | |
20:54
[bjoern] joined
20:56
sbp joined
|
|||
[bjoern] | yo sbp! | 20:57 | |
sbp | why hello there [bjoern]... | ||
[bjoern] | What is thy bidding? | ||
sbp | well I just installed Rakudo | ||
[bjoern] | cool | ||
sbp | and I'm trying to write a p6grep, à la pcregrep | ||
it should be quite easy, but I have a problem | 20:58 | ||
20:58
eternaleye joined
|
|||
sbp | where I'm doing if $line ~~ /pattern/, the regex works when it's /literal/ | 20:58 | |
but if I try to use /<$pattern>/, it doesn't work | |||
I'm wondering if variable interpolation into regexps isn't supported yet in rakudo | 20:59 | ||
or if I'm doinitwrong | |||
(the error I get is: Statement not terminated properly at line 9, near "~~ /<$patt") | |||
[bjoern] | paste the code to sial.org/pbot/perl6 ? | 21:00 | |
mberends | sbp, the $pattern dos *not* interpolate by design. | ||
sbp | mberends: I thought it was true that /$pattern/ does not interpolate | ||
mberends: but that /<$pattern>/ *does* | |||
pasteling | "sbp" at 86.8.186.21 pasted "p6grep.pl" (12 lines, 248B) at sial.org/pbot/35731 | 21:01 | |
mberends | yes, afaik $pattern contains the name of another regex | ||
sbp | oh, the name? hmm | ||
I thought the content | |||
[bjoern] | so how do you turn a string into a regex? | ||
21:02
donaldh joined
|
|||
mberends | it seems to be discouraged by design, maybe to avoid tainting | 21:02 | |
literal | eval it? | ||
21:03
sri_kraih joined
|
|||
literal | grammars and classes share the same namespace, right? | 21:04 | |
their package names, that is | 21:05 | ||
mberends | yes | ||
sbp, I said it wrong, $pattern contains a regex object or literal characters | 21:07 | ||
[bjoern] | so if it's a string it's as if all the special character are escaped? | 21:08 | |
mberends | but a * in $pattern always means '*', never repeat count.... yes | 21:09 | |
21:10
pmurias left
|
|||
mberends | S05:923 =head1 Variable (non-)interpolation | 21:10 | |
21:13
sri_kraih_ left
|
|||
[bjoern] | So how would you use eval to do it? Code snippet for the evalbot? | 21:18 | |
literal | rakudo: my $line = 'foo bar'; my $rx = 'fo\w bar'; eval "say 'yay' if \$line ~~ /$rx/" | 21:31 | |
p6eval | rakudo 7af829: RESULT«Match.new( # WARNING: this is not working perl code # and for debugging purposes only ast => "", text => "", from => 7, to => -2,)» | ||
literal | or something | ||
21:33
fridim_ joined
21:35
Limbic_Region joined
21:37
ejs left
21:46
mberends left,
ejs joined
22:01
amoc left
22:03
M_o_C left
22:07
mikehh joined
22:10
icwiener joined
22:12
ZuLuuuuuu left
22:19
donaldh left
|
|||
pugs_svn | r26018 | hinrik++ | [util/perl6.vim] use vim's Include highlighting for the 'use' and 'require' keywords | 22:24 | |
bacek | good morning | 22:25 | |
22:25
[bjoern] left
22:28
dduncan left
22:32
nihiliad joined
22:33
kate21de joined
22:40
frioux joined
|
|||
frioux | s1n: ping? | 22:40 | |
22:49
destiney joined
22:50
gdonald joined
22:58
destiney left
|
|||
pugs_svn | r26019 | putter++ | [elfish/showcode] Add .notes{} info to the IR pane. | 23:03 | |
r26019 | putter++ | [elf_h] Add Any::object_id. Sync elf_h with elf_h_src. Tweak README. | |||
23:04
orafu joined
23:08
gdonald left
23:21
OuLouFu left
23:27
kate21de left
23:28
kate21de joined
23:29
kate21de left
23:31
ejs left
|
|||
frioux | rakudo: 5|6 + 7 | 23:54 | |
p6eval | rakudo 7af829: RESULT«any(5, 13)» | ||
frioux | rakudo: 5|6 + 7&8 | ||
p6eval | rakudo 7af829: RESULT«any(5, all(13, 8))» | ||
frioux | (1,2,3,4,5,6,7).grep: {$_ < 4} | 23:57 | |
rakudo: (1,2,3,4,5,6,7).grep: {$_ < 4} | |||
p6eval | rakudo 7af829: RESULT«[1, 2, 3]» |