Perl 6 - the future is here, just unevenly distributed

IRC log for #perl6, 2009-09-26

Perl 6 | Reference Documentation | Rakudo

| Channels | #perl6 index | Today | | Search | Google Search | Plain-Text | summary

All times shown according to UTC.

Time Nick Message
00:00 ewilhelm_ joined #perl6
00:02 diakopter @karma TimToady
00:02 lambdabot TimToady has a karma of 50
00:02 diakopter ++TimToady
00:02 diakopter @karma TimToady
00:02 lambdabot TimToady has a karma of 50
00:02 diakopter hm
00:03 TimToady ++diakopter for finding a way to make people feel good without giving them karma :)
00:03 diakopter ++diakopter--
00:04 diakopter let-down
00:05 scottp I found lots of refernces to other people on the net with the same issue, but no solution.
00:05 scottp GCC VErsion = gcc version 4.2.1 (Apple Inc. build 5646)
00:05 scottp Yes it could be a 64 bit issue
00:05 TimToady @karma ++diakopter
00:05 lambdabot ++diakopter has a karma of -1
00:06 scottp Issues seems to be around: src/string/api.c - LONG_MAX' undeclared
00:06 TimToady for a bot written by geniuses, lambdabot can be amazingly stupid at times
00:14 Avada joined #perl6
00:15 TimToady moritz_: lesson 15, Twigils has a missing twigil on $a: my $block = { say "$^c $a $^b" };
00:39 nErVe joined #perl6
00:50 payload joined #perl6
00:59 jonathanturner joined #perl6
01:02 Confield left #perl6
01:03 Confield joined #perl6
01:07 pugs_svn r28408 | lwall++ | [stub.t] is instead should be supersede
01:13 pugs_svn r28409 | lwall++ | [STD] recognize sub stubs and don't complain about redefinition
01:18 TimToady std: sub foo {...}; sub foo {42}
01:18 p6eval std 28379: OUTPUT«[31m===[0mSORRY![31m===[0m␤Illegal redeclaration of lexical routine foo (from line 1) at /tmp/EcTukOXOne line 1:␤------> [32msub foo {...}; sub foo[33m⏏[31m {42}[0m␤    expecting new name to be defined␤FAILED 00:01 95m␤»
01:18 TimToady ENOTYET
01:28 TimToady decommuting while I wait &
01:30 jonathanturner left #perl6
01:33 crythias joined #perl6
01:57 rhr_ joined #perl6
02:07 pmichaud joined #perl6
02:07 crythias joined #perl6
02:07 payload joined #perl6
02:07 Avada joined #perl6
02:07 ewilhelm_ joined #perl6
02:07 Matt-W_ joined #perl6
02:07 tak11 joined #perl6
02:07 Student joined #perl6
02:07 nihiliad1 joined #perl6
02:07 mberends joined #perl6
02:07 abra joined #perl6
02:07 Patterner joined #perl6
02:07 elmex joined #perl6
02:07 alester joined #perl6
02:07 xinming_ joined #perl6
02:07 PacoLinux joined #perl6
02:07 frew_ joined #perl6
02:07 mikehh joined #perl6
02:07 jrtayloriv joined #perl6
02:07 mj41_ joined #perl6
02:07 jiing joined #perl6
02:07 silug joined #perl6
02:07 drbean joined #perl6
02:07 avuserow joined #perl6
02:07 Caelum joined #perl6
02:07 devin joined #perl6
02:07 ezra joined #perl6
02:07 pugs_svn joined #perl6
02:07 phenny joined #perl6
02:07 sbp joined #perl6
02:07 rjh joined #perl6
02:07 Helios- joined #perl6
02:07 kolibrie joined #perl6
02:07 Khisanth joined #perl6
02:07 nsh joined #perl6
02:07 frodwith joined #perl6
02:07 c9s joined #perl6
02:07 Maddingue joined #perl6
02:07 JarJarBinks joined #perl6
02:07 PerlJam joined #perl6
02:07 synth joined #perl6
02:07 lisppaste3 joined #perl6
02:07 meteorjay joined #perl6
02:07 clkao joined #perl6
02:07 Woodi joined #perl6
02:07 integral joined #perl6
02:07 yves joined #perl6
02:07 blaze-x joined #perl6
02:07 garron joined #perl6
02:07 buu joined #perl6
02:07 christine joined #perl6
02:07 solarion joined #perl6
02:07 Infinoid joined #perl6
02:07 dmpk2k joined #perl6
02:12 St[u]dent joined #perl6
02:17 jaldhar joined #perl6
02:19 sjohnson how is everyone today?
02:52 s1n_mini joined #perl6
02:53 rhr joined #perl6
03:05 diakopter muy bueno
03:05 diakopter std: sub foo {...}; sub foo {42}
03:05 p6eval std 28379: OUTPUT«[31m===[0mSORRY![31m===[0m␤Illegal redeclaration of lexical routine foo (from line 1) at /tmp/bpW54yMNnQ line 1:␤------> [32msub foo {...}; sub foo[33m⏏[31m {42}[0m␤    expecting new name to be defined␤FAILED 00:01 95m␤»
03:08 sjohnson howdy diakopter
03:09 diakopter sjohnson: hiya
03:09 diakopter sjohnson: do you have a shovel for the pugscode repo
03:09 diakopter I mean commit bit
03:10 sjohnson i have commit access if that's what you mean
03:10 diakopter yep
03:10 sjohnson how can i help you, kind sir
03:11 diakopter extend Joose with more Perl6ishness?
03:12 sjohnson what is Joose?
03:12 diakopter http://code.google.com/p/joose-js/
03:12 diakopter Moose -> JS
03:12 sjohnson i was just about to explain how i was coding in JS for 8 hours today
03:12 sjohnson and it was a nightmare
03:12 diakopter oh :(
03:13 diakopter most languages have non-fun software that can be written in them
03:13 sjohnson i hate javascript, but is this intended to make the life of a JS programmer happier?
03:13 diakopter hugme: hug JavaScript
03:13 * hugme hugs JavaScript
03:13 sjohnson perl is the only language i am happy with, and i am struggling to get someone to backport trim in p5 atm
03:15 diakopter sjohnson: what kind of JS software do you wrte
03:15 diakopter write
03:15 sjohnson a bit ot, but if i could get trim backported into p5, i think p5 would become the perfect language
03:15 sjohnson just stuff to make ajax-like response on my boss's website
03:15 diakopter o
03:17 Tene sjohnson: it's a one-line subroutine you can write yourself, just like say
03:18 sjohnson tene, i realize that.  problem is, it's tedious to have to keep writing it
03:18 sjohnson for something so basic
03:19 sjohnson as annoying as if i had to  write a sub addInteger (int1, int2) function
03:19 sjohnson to add two numbers together
03:19 sjohnson having to redeclare something so basic becomes tedious very quickly, especially if it is used very commonly on about 30+ stand alone perl unix scripts
03:19 NorwayGeek joined #perl6
03:20 sjohnson of course, you could use a use module; to bring it in that you write yourself once, but then it is defeated as you migrate systems
03:20 sjohnson which also busts the CPAN String::Strip; approach
03:20 NorwayGeek joined #perl6
03:21 sjohnson Matt-W_: if you are here, please chime in
03:21 Tene they couldn't even get *say* in without requiring a version declaration.
03:21 sjohnson it's a step in the right direction though, and i could settle for that
03:22 sjohnson especially if hypothetically it is included now, and then  two years, every new system within that time has it already
03:22 sjohnson and i dont have keep using a macro in VI to paste my trim() sub
03:22 diakopter sjohnson: zounds2me like you might could use an editor with some nice paste helpers... macros of a sort.
03:22 diakopter there you go.
03:22 diakopter what you said.
03:23 diakopter except s/two/twenty/
03:23 sjohnson why even include it in Perl6
03:23 sjohnson if we can just take this purist attitude of having to write it yourself
03:23 sjohnson everytime you want to trim whitespace, which is quite common for a lot of applications
03:24 diakopter most systems have *some* type of shared/reuse/modular capability
03:24 sjohnson by this logic of having to only "write one function", should we tell the p6 devels they made a mistake including it, and have it removed?
03:25 diakopter sjohnson: no, Tene's point was that (ideally) each user might need to write it only once, and then reuse/include it from somewhere shared/reusable/modular.
03:25 sjohnson it is easy to do that on a system where you never migrate, but hoping shell to shell, it becomes very tedious
03:26 sjohnson getting all sorts if @INC errors
03:26 sjohnson for the simplest tasks
03:26 sjohnson i wonder what TimToady thinks
03:27 Tene sjohnson: I wasn't saying that it was ideal, just likely to be more successful than getting it into a standard Perl 5.
03:27 Tene sjohnson: I like having those things in Perl 6, and wish they could be more available in Perl 5 too.
03:27 sjohnson oh i c, alright im sorry if i sounded fussy
03:28 Tene nah, s'fine, I get it
03:28 sjohnson i'm mostly talking from my @INC headaches that i have had numerous times as i migrate ubuntu systems about once every two months
03:28 * diakopter should've appended the parenthetical with "[Ed.]
03:28 diakopter "
03:29 sjohnson python users also point at me in ridicule when they say "every other language has this already"
03:29 sjohnson perhaps i just need to talk to someone high up on the perl 5 food-chain
03:31 Tene sjohnson: maybe I've been a bit dissilusioned by chromatic, as most of my perception of the perl 5 development process has come from him, but I'd be shocked if you were successful in getting it into, say, 5.12 or something.
03:31 pugs_svn r28410 | diakopter++ | [vijs] literal integers with radices 2-36, and beginnings of some other stuff
03:31 diakopter vijs: say :2<101010110000101011101011111>
03:31 p6eval vijs 28379: OUTPUT«89675615␤»
03:31 diakopter vijs: say :3<1012021202121202020202120212021212120212021212121212>
03:31 p6eval vijs 28379: OUTPUT«2575462627556708885900330␤»
03:32 diakopter ++TimToady
03:32 sjohnson Tene: i was told that too, but i think it's worth trying, based on how much peace of mind i would have if this was in every new version of p5, even if it is so late in the game
03:32 sjohnson my grandchildren would be proud
03:33 sjohnson ... well, i should probably have kids first
03:33 TimToady std: sub foo {...}; sub foo {42}
03:33 p6eval std 28379: OUTPUT«[31m===[0mSORRY![31m===[0m␤Illegal redeclaration of lexical routine foo (from line 1) at /tmp/fAgl3qaqk8 line 1:␤------> [32msub foo {...}; sub foo[33m⏏[31m {42}[0m␤    expecting new name to be defined␤FAILED 00:01 95m␤»
03:33 diakopter evalbot control restart
03:33 p6eval joined #perl6
03:34 diakopter o
03:34 diakopter std rebuild commented ou
03:34 diakopter t
03:34 * diakopter runs it manually
03:35 diakopter p6eval@debian:~$ sh /home/p6eval/build-std.sh >> ~/std.log 2>&1
03:36 diakopter vijs: say :36<MqfzUwn8QWn6gEJUleE38HT1mN1xAjcTaTak7lYCTcfSHJwhBYZUJL4PLBcv0>
03:36 p6eval vijs 28379: OUTPUT«Can't locate object method "parsefile" via package "STD" (perhaps you forgot to load "STD"?) at vivjs line 32.␤»
03:37 diakopter oo
03:37 * diakopter hides from moritz_
03:38 diakopter vijs: say :36<MqfzUwn8QWn6gEJUleE38HT1mN1xAjcTaTak7lYCTcfSHJwhBYZUJL4PLBcv0>
03:38 p6eval vijs 28379: OUTPUT«Can't locate object method "term__S_424identifier" via package "STD" at ../STD.pm line 1122.␤»
03:38 diakopter erm
03:39 sjohnson can evalbot be called evilbot on halloween?
03:39 diakopter maybe it was commented out For A Reason
03:41 diakopter TimToady: oh
03:41 diakopter it's a bug, I think
03:42 diakopter vijs: say :9<13458678546371608345764830716081374085678430711634857846017043856710>
03:42 p6eval vijs 28410: OUTPUT«Can't locate object method "term__S_424identifier" via package "STD" at ../STD.pm line 1122.␤»
03:42 diakopter or not.
03:45 diakopter fixing
03:48 lisppaste3 sjohnon pasted "test!" at http://paste.lisp.org/display/87756
03:48 diakopter std: sub foo {...}; sub foo {42}
03:48 p6eval std 28410: OUTPUT«ok 00:01 95m␤»
03:48 diakopter TimToady: well
03:52 p6eval joined #perl6
03:53 diakopter vijs: say :9<13458678546371608345764830716081374085678430711634857846017043856710>
03:53 p6eval vijs 28410: OUTPUT«11954939178966231668384533330838882036560780896698335392896645574␤»
03:53 diakopter vijs: say :36<MqfzUwn8QWn6gEJUleE38HT1mN1xAjcTaTak7lYCTcfSHJwhBYZUJL4PLBcv0>
03:53 p6eval vijs 28410: OUTPUT«54304609169441051460560502897758299028480854366838378212740174448624496028652862901844878216924␤»
03:54 diakopter whee
03:55 diakopter phenny: tell moritz_ I made some changes to misc/evalbot/evalbot.pl and src/perl6/Makefile in /home/p6eval/pugs; please take a look and commit if you approve.  The changes I made were to make vijs use the same STD "build" as the STD syntax checker (since it was divested from viv, vivjs on p6eval was using its own hybrid of sorts)
03:55 phenny diakopter: I'll pass that on when moritz_ is around.
04:01 diakopter TimToady: interestingly, vijs already had (and I didn't realize it) the correct pass-by-ref semantics we were discussing earlier:
04:01 diakopter vijs: my $a = 3; say $a, $a++, $a
04:01 p6eval vijs 28410: OUTPUT«434␤»
04:03 diakopter vijs: say -:16<DEADBEEF>
04:03 p6eval vijs 28410: OUTPUT«-3735928559␤»
04:16 pugs_svn r28411 | diakopter++ | [vijs] fix overriding lexical names so they're declared in the proper context
04:18 diakopter vijs: my $b=3; my $a=sub{ my $a=$b++ + 2; say $a }; $a(); $a()
04:18 p6eval vijs 28410: OUTPUT«5␤6␤»
04:20 molaf joined #perl6
04:27 sjohnson (´ー` )
04:32 diakopter vijs: say :37<0>
04:32 p6eval vijs 28410: OUTPUT«execute(): execute error: radix out of range (2..36) at vivjs line 66.␤»
04:42 zerhash joined #perl6
04:42 petdance joined #perl6
05:37 synth^2 joined #perl6
06:04 wayland76 joined #perl6
06:06 jaldhar joined #perl6
06:30 zloyrusskiy joined #perl6
06:37 pugs_svn r28412 | jimmy++ | [zh-cn/syn/S02-bits.pod]updated SVN to r28409
06:44 Student joined #perl6
07:01 TiMBuS joined #perl6
07:06 NorwayGeek|Away joined #perl6
07:20 jauaor left #perl6
07:21 pugs_svn r28413 | jimmy++ | [zh-cn/syn/S02-bits.pod]added random translation, still needs more work.
07:21 Zloyrusskiy joined #perl6
07:38 drbean joined #perl6
07:52 moritz_ diakopter: feel free to commit without asking for permission. Forgiveness > Permission
07:52 phenny moritz_: 03:55Z <diakopter> tell moritz_ I made some changes to misc/evalbot/evalbot.pl and src/perl6/Makefile in /home/p6eval/pugs; please take a look and commit if you approve.  The changes I made were to make vijs use the same STD "build" as the STD syntax checker (since it was divested from viv, vivjs on p6eval was using its own hybrid of sorts)
07:54 mberends vivjs latest commit worksforme on the eeepc, diakopter++
08:15 moritz_ TimToady: (5 to 6 blog) missing twigil added, thanks
08:18 pugs_svn r28414 | moritz++ | [evalbot] rebuild parrot only when rakudo needs it - this time for real.
08:19 moritz_ bah
08:20 moritz_ if foo is a directory, ln -s foo bar and ln -s foo/ bar do different things.
08:34 moritz_ rakudo: say 'hi'
08:34 p6eval rakudo 729722: OUTPUT«hi␤»
08:34 moritz_ ok, the update worked.
08:35 PZt joined #perl6
08:54 reqamst joined #perl6
09:19 am0c joined #perl6
09:20 icwiener joined #perl6
09:24 pugs_svn r28415 | jimmy++ | [zh-cn/syn/S02-bits.pod]added more random translation.
09:31 synth^2 joined #perl6
09:53 dakkar joined #perl6
09:57 icwiener joined #perl6
10:24 JimmyZ joined #perl6
10:30 abra joined #perl6
10:43 pugs_svn r28416 | jimmy++ | [zh-cn/syn/S02-bits.pod]added more translation that makes more localization. It needs more time.
10:47 pmurias joined #perl6
11:22 meppl joined #perl6
11:33 Whiteknight joined #perl6
11:34 iblechbot joined #perl6
11:36 lichtkind joined #perl6
11:39 M_o_C joined #perl6
11:59 JimmyZ joined #perl6
12:12 moritz_ http://smolder.plusthree.com/app/public_projects/tap_stream/28098/294 doesn't look too nice
12:18 jnthn ohai
12:18 moritz_ it's j\o/nathan
12:18 mberends jnthn: oh hai
12:19 jnthn moritz_: :-P :-)
12:19 jnthn mberends: hi, how's things?
12:19 dalek rakudo: e33d20e | moritz++ | docs/release_guide.pod:
12:19 dalek rakudo: [docs] mention smolder reports in release_guide.pod
12:19 dalek rakudo: Also move the 2009-09 release to the list of old releases
12:19 dalek rakudo: review: http://github.com/rakudo/rakudo/commit/e33d20eed6ea97806c30e5f7cced25ef908519d6
12:20 mberends good thanks, hacking away at proto, needs refactoring as functionality is added. Also thinking about when to rewrite Temporal (is the new spec stable?)
12:21 jnthn Ah, the "is the spec stable" game :-)
12:21 * jnthn knows that one well, so can empathize...
12:21 moritz_ mberends: it's as stable as it gets when nobody hacks on an implementation ;-)
12:22 mberends :-) time to hack then...
12:23 jnthn Aye, it often goes that way
12:30 diakopter moritz_: did you see the change
12:31 * diakopter waiting for plane to SiValley
12:32 carlin left #perl6
12:34 diakopter moritz_: can I commit from p6eval's account without it saving my credentials in /home/p6eval/.svn (not as if it really matters)
12:34 sri_ joined #perl6
12:35 PacoLinux With the latest patch from NotFound++ parrot compiles again in Haiku :)
12:36 broquaint joined #perl6
12:37 jnthn NotFound wrote a patch
12:37 jnthn Parrot compiles again w00t
12:37 jnthn This is so awesome
12:37 jnthn ;-)
12:38 * diakopter almost done adding argslots to vijs subroutines/closures. No multis yet, of course.
12:39 jnthn diakopter: Writing multi dispatchers is fun! :-)
12:39 diakopter so I've heard :D
12:39 diakopter and waiting for them to run is even funner
12:40 diakopter moritz_: nm; I'll commit from another place
12:42 moritz_ diakopter: it was just a few path changes, right?
12:45 diakopter yeah, but also hopefully avoiding rebuilding STD unnecessarily
12:45 ejs joined #perl6
12:45 diakopter then maybe rebuild_std can be uncommented in the crontab
12:46 nihiliad joined #perl6
12:46 TiMBuS is the only way to delete an item from a hash to use .delete? there probably should be a sub version of it..
12:46 diakopter undefine?
12:46 diakopter (I dunno)
12:46 TiMBuS awwwh i should have known that
12:47 diakopter I remember only the last 0.2 of the last synopsis I read... and none of the others.  small window.
12:47 diakopter to clarify, I don't know whether undefine should do that
12:47 TiMBuS yeah perl 6 is hard to digest
12:48 moritz_ the .delete method is not specced
12:48 TiMBuS too big to swallow, might be a better way to put it
12:48 moritz_ the spec says there's a :delete adverb to the .{} operator
12:48 diakopter o
12:48 mberends undefine gets rid of the value, .delete gets rid of the key
12:49 TiMBuS also .delete gives a null_pmc on a nonexisting key
12:51 mberends diakopter: shall I begin building a test harness for vivjs?
12:52 diakopter mberends: let's wait a bit..
12:52 diakopter give me 1 more day, and it should be able to run the spectests
12:53 diakopter I don't know whether to use the fudge system
12:53 moritz_ why not?
12:54 diakopter it would clutter the .t files more?  I dunno.
12:54 diakopter t/
12:54 moritz_ that's fine
12:54 mberends fudging will be essential early on, so that the unimplemented bits don't prevent testing of the implemented ones.
12:55 diakopter oh :)
12:55 * diakopter is convinced now; thanks moritz_ & mberends
12:55 moritz_ FYI rakudo has 1333 fudge directives in t/spec/ :-)
12:56 moritz_ rakudo: say 1333/18670
12:56 diakopter 1 more and it's 1334
12:56 p6eval rakudo e33d20: OUTPUT«0.0713979646491698␤»
12:56 moritz_ 4 more and it's leet ;-)
12:56 diakopter oh, 4 more.
12:56 diakopter :)
12:57 mberends right now with say '1..1' vivjs can already pass 1/1
12:57 diakopter mberends: pmurias already added some .t
12:57 mberends oh, nice :)
12:59 diakopter since the Test.pm subs are mostly wrappers of try/catch, I'm going to use the JS try/catch, so the Test.pm subs will be special cased as lazy JS subs (as opposed to the sole other JS sub, `say`, which is strict).
13:00 diakopter JS subs are just built in subs that masquerade as p6subs
13:01 diakopter but written entirely in JS, but just as if they were a p6 sub
13:01 diakopter easily permits gradual 'bootstrapping', I guess.
13:02 jnthn diakopter: We did the same in Rakudo - using Parrot primitives that were "right enough" to get a start.
13:02 diakopter neat
13:03 jnthn e.g. Parrot has multi-dispatch support built in, so we used its default algorithm at first.
13:03 diakopter yet another thing the media folks can't label "unprecedented"
13:03 jnthn Which was good enough for a while.
13:04 mberends I was thinking of a special Test.pm for vivjs, based on what it's current P6 capabilities are
13:04 mberends *its
13:05 diakopter it can't be a special Test.pm just yet
13:06 diakopter without adding some magical markers here and there
13:06 mberends sure, even 'use' is NYI. That t/say.t shows the way to get started.
13:07 jnthn Also see what's in the t/00- and t/01- directories in Rakudo
13:07 jnthn Which are its "can we run the test harness yet"-ish tests.
13:08 carlin joined #perl6
13:09 mberends yeah, sanity and so on, that's what I could start on already. I think I'll at least write a Makefile with 'test' and 'spectest' targets along Rakudo's lines.
13:10 diakopter vijs: say :16<AF>
13:10 p6eval vijs 28416: OUTPUT«175␤»
13:11 diakopter vijs: say :16<af>
13:11 p6eval vijs 28416: OUTPUT«175␤»
13:11 diakopter oh good
13:11 mberends nice
13:11 diakopter plane flight&
13:12 ruoso joined #perl6
13:16 ruoso bom dia, #perl6
13:18 NorwayGeek joined #perl6
13:28 payload joined #perl6
13:29 ejs joined #perl6
13:34 crythias joined #perl6
13:37 molaf joined #perl6
13:42 ab5tract joined #perl6
13:45 pmurias ruoso: hi
13:47 saran joined #perl6
13:48 abbe joined #perl6
13:49 abbe hi everyone
13:49 abbe any ideas about http://paste2.org/p/438734 ?
14:01 carlin Daylight saving just ended so I lose an hour
14:01 * carlin grumbles
14:02 jnthn You'll get it back in six months.
14:04 s1n carlin: where do you live that has daylight savings already?
14:05 carlin s1n: New Zealand
14:05 carlin s/ended/started/
14:05 s1n ahh okay
14:22 TopoMorto joined #perl6
14:32 Psyche^ joined #perl6
14:32 Student joined #perl6
14:35 mberends abbe: from S02:2959: "bare array, hash and subroutine variables my I<never> be interpolated.", so Pugs was being too P5ish
14:35 mberends *may
14:40 abbe i copied that code from an article authored by moritz_ .
14:41 mberends abbe: we are walking barefoot on a construction site ;-)
14:41 abbe :)
14:43 mberends abbe: nice domain name, btw :)
14:43 abbe oh, thanks mberends :)
14:48 zamolxes joined #perl6
14:53 NorwayGeek joined #perl6
14:54 frew__ joined #perl6
14:56 am0c joined #perl6
15:03 carlin \o/ Rakudo on Haiku with no hackery. Still had to use --without-opengl though
15:08 s1n pmichaud: remember, hackathon today at 2p at Saxby's :)
15:31 tak11 joined #perl6
15:32 pmichaud good morning, #perl6
15:32 pmichaud s1n: yes, hadn't forgotten it this time.  :)
15:35 pugs_svn r28417 | jimmy++ | [zh-cn/syn/S02-bits.pod]added a bit translation for Whitespace and comment, needs more work.
15:42 cognominal Haiku?
15:43 carlin An open source BeOS clone
15:43 carlin http://www.haiku-os.org/
15:44 cognominal fast boot is nice
15:48 s1n pmichaud: i have my new toy this time
15:52 pmichaud s1n: yes, I want to see your new toy.  I'm thinking of getting one for a relative.  :)
15:54 s1n pmichaud: i'll be there early, i have to start preparing for an exam
15:57 dolmen joined #perl6
16:00 pmichaud okay, I'll try to show a bit early also then.
16:04 moritz_ rakudo: class A { has $!bar = "OH HAI"; method Str() { $!bar }}; say A.new.Str
16:04 p6eval rakudo e33d20: OUTPUT«OH HAI␤»
16:04 moritz_ rakudo: class A { has $.bar = "OH HAI"; method Str() { $!bar }}; say A.new.Str
16:04 p6eval rakudo e33d20: OUTPUT«OH HAI␤»
16:15 moritz_ rakudo: my $x = ''; $x ~= $_ for Nil; say $x.perl
16:15 p6eval rakudo e33d20: OUTPUT«"Nil()"␤»
16:15 justatheory joined #perl6
16:17 pugs_svn r28418 | moritz++ | [t/spec] test for RT #69270
16:24 pugs_svn r28419 | moritz++ | [t/spec] test for RT #69262
16:25 dolmen rakudo: say 3.Str
16:25 p6eval rakudo e33d20: OUTPUT«3␤»
16:25 dolmen rakudo: say 3.Range
16:25 p6eval rakudo e33d20: OUTPUT«Method 'Range' not found for invocant of class 'Int'␤»
16:25 dolmen rakudo: say 3.Float
16:25 p6eval rakudo e33d20: OUTPUT«Method 'Float' not found for invocant of class 'Int'␤»
16:25 moritz_ rakudo: say 3.Num
16:25 p6eval rakudo e33d20: OUTPUT«3␤»
16:26 moritz_ rakudo: say 3.Num.WHAT
16:26 p6eval rakudo e33d20: OUTPUT«Num()␤»
16:26 dolmen rakudo: say 3.Int.WHAT
16:26 p6eval rakudo e33d20: OUTPUT«Int()␤»
16:26 dolmen rakudo: say 3..5.WHAT
16:26 p6eval rakudo e33d20: OUTPUT«Use of type object as value␤␤»
16:26 dolmen rakudo: say (3..5).WHAT
16:26 p6eval rakudo e33d20: OUTPUT«Range()␤»
16:27 dolmen rakudo: say (3..5).WHAT.WHAT
16:27 p6eval rakudo e33d20: OUTPUT«Range()␤»
16:27 dolmen rakudo: say (3..5)[0]
16:27 p6eval rakudo e33d20: OUTPUT«3␤»
16:28 dolmen rakudo: say (3..5)[4]
16:28 p6eval rakudo e33d20: OUTPUT«Use of uninitialized value␤␤»
16:28 dolmen rakudo: say (3..5)[2]
16:28 p6eval rakudo e33d20: OUTPUT«5␤»
16:29 dolmen rakudo: say "5".Int
16:29 p6eval rakudo e33d20: OUTPUT«5␤»
16:29 dolmen rakudo: say "5".Int.WHAT
16:29 p6eval rakudo e33d20: OUTPUT«Int()␤»
16:30 dolmen rakudo: say "5..7".Range.WHAT
16:30 p6eval rakudo e33d20: OUTPUT«Method 'Range' not found for invocant of class 'Str'␤»
16:30 moritz_ I don't think that should work
16:30 moritz_ with eval() instead of .Range, yes
16:31 dolmen rakudo: say "5..7".eval.WHAT
16:31 p6eval rakudo e33d20: OUTPUT«Method 'eval' not found for invocant of class 'Str'␤»
16:31 dolmen rakudo: say eval("5..7").WHAT
16:31 p6eval rakudo e33d20: OUTPUT«Range()␤»
16:32 dolmen rakudo: say PROCESS.WHAT
16:32 p6eval rakudo e33d20: OUTPUT«Null PMC access in getprop()␤»
16:32 moritz_ rakudo: say FOOO.WHAT
16:32 molaf joined #perl6
16:32 p6eval rakudo e33d20: OUTPUT«Could not find non-existent sub FOOO␤»
16:33 dolmen rakudo: say GLOBAL.WHAT
16:33 p6eval rakudo e33d20: OUTPUT«Null PMC access in getprop()␤»
16:33 moritz_ dolmen: could you submit a bug report for PROCESS.WHAT?
16:33 dolmen ok
16:33 pugs_svn r28420 | moritz++ | [t/spec] tests for RT #69260, private attributes leaking to parent class
16:39 pugs_svn r28421 | moritz++ | [t/spec] test for RT #66818, %*VM behaving weirdly
16:45 dolmen rakudo: say %ENV.WHAT
16:45 p6eval rakudo e33d20: OUTPUT«Symbol '%ENV' not predeclared in <anonymous> (/tmp/BHOlIrAuSx:2)␤in Main (src/gen_setting.pm:3469)␤»
16:45 dolmen rakudo: say %ENV.kv
16:45 p6eval rakudo e33d20: OUTPUT«Symbol '%ENV' not predeclared in <anonymous> (/tmp/UzWrHwajdN:2)␤in Main (src/gen_setting.pm:3469)␤»
16:46 dolmen rakudo: say %toto
16:46 pmichaud I think you mean %*ENV
16:46 p6eval rakudo e33d20: OUTPUT«Symbol '%toto' not predeclared in <anonymous> (/tmp/soY8zRHrdz:2)␤in Main (src/gen_setting.pm:3469)␤»
16:46 cls_bsd joined #perl6
16:46 dolmen rakudo: say %*ENV.WHAT
16:46 p6eval rakudo e33d20: OUTPUT«Hash()␤»
16:46 dolmen rakudo: say %*ENV.kv
16:46 p6eval rakudo e33d20:
16:46 p6eval ..OUTPUT«PATH/usr/local/bin:/usr/bin:/bin:/usr/gamesLS_COLORSno=00:fi=00:di=01;34:ln=01;36:pi=40;33:so=01;35:do=01;35:bd=40;33;01:cd=40;33;01:or=40;31;01:su=37;41:sg=30;43:tw=30;42:ow=34;42:st=37;44:ex=01;32:*.tar=01;31:*.tgz=01;31:*.svgz=01;31:*.arj=01;31:*.taz=01;31:*.lzh=01;31:*.lzma=01;…
16:46 dolmen interesting...
16:47 pmichaud rakudo:  say %*ENV.perl
16:47 p6eval rakudo e33d20: OUTPUT«{"TERM" => "screen", "SHELL" => "/bin/bash", "HISTCONTROL" => "ignoreboth", "_" => "../p/bin/perl6", "USER" => "p6eval", "PERL6LIB" => "lib", "LANG" => "en_US.UTF-8", "LOGNAME" => "p6eval", "MAIL" => "/var/mail/p6eval", "HOME" => "/home/p6eval", "SHLVL" => "2", "PWD" =>
16:47 p6eval .."/home/p6ev…
16:47 dolmen rakudo: say $^X
16:47 p6eval rakudo e33d20: OUTPUT«too few arguments passed (0) - 1 param expected␤in Main (/tmp/9B5Is4Eor7:0)␤»
16:52 dolmen Which synopsis defines %*ENV ?
16:53 dolmen say "56".chop
16:54 dolmen rakudo: say "56".chop
16:54 p6eval rakudo e33d20: OUTPUT«5␤»
16:54 dolmen rakudo: say "é".chop
16:54 p6eval rakudo e33d20: OUTPUT«␤»
16:54 pmichaud rakudo:   { say "hello" }.()
16:54 p6eval rakudo e33d20: OUTPUT«hello␤»
16:54 pmichaud rakudo:   sub { say "hello" }.()
16:54 p6eval rakudo e33d20: OUTPUT«Confused at line 2, near ".()"␤in Main (src/gen_setting.pm:3469)␤»
16:54 s1n_mini joined #perl6
16:54 pmichaud rakudo:   { say "hello" #`(hello) }.()
16:54 p6eval rakudo e33d20: OUTPUT«hello␤»
16:55 dolmen rakudo: my $x = { say "hello" }; $x.();
16:55 p6eval rakudo e33d20: OUTPUT«hello␤»
16:55 dolmen rakudo: ({ say "hello" }).();
16:55 p6eval rakudo e33d20: OUTPUT«hello␤invoke() not implemented in class 'Boolean'␤in Main (/tmp/Sr22ON3JEs:0)␤»
16:55 dolmen Boolean?
16:56 dolmen rakudo: (true).();
16:56 p6eval rakudo e33d20: OUTPUT«Syntax error at line 2, near "(true).();"␤in Main (src/gen_setting.pm:3469)␤»
16:56 dolmen rakudo: true.();
16:56 p6eval rakudo e33d20: OUTPUT«invoke() not implemented in class 'Undef'␤in Main (/tmp/2Go1guJKJe:2)␤»
16:56 dolmen rakudo: say true;
16:56 pmichaud ({ say "hello"})   is an immediate block
16:56 p6eval rakudo e33d20: OUTPUT«say requires an argument at line 2, near " true;"␤in Main (src/gen_setting.pm:2565)␤»
16:56 dolmen rakudo: say True;
16:56 p6eval rakudo e33d20: OUTPUT«1␤»
16:56 dolmen rakudo: (True).();
16:56 p6eval rakudo e33d20: OUTPUT«invoke() not implemented in class 'Boolean'␤in Main (/tmp/0Wmh2HfEA9:2)␤»
16:57 dolmen an immediate block? could you tell me more?
16:57 pmichaud at least, Rakudo thinks that ({say "hello"})  is an immediate block.  Perhaps it shouldn't.
16:57 pmichaud an immediate block is a code block that is executed automatically when it's encountered
16:58 pmichaud for example:
16:58 pmichaud rakudo:   say "foo";  { say "baz"; };  say "bar";
16:58 p6eval rakudo e33d20: OUTPUT«foo␤baz␤bar␤»
16:58 pmichaud the inner block is an "immediate block"
16:58 s1n pmichaud: what all should i take on my thumbdrive?
16:58 pmichaud s1n: I don't know.
16:58 s1n pmichaud: i have the sept. release of rakudo
16:58 pmichaud s1n: that should be good enough
16:58 dolmen rakudo: ({ say "hello" });
16:58 p6eval rakudo e33d20: OUTPUT«hello␤»
16:59 dolmen rakudo: say ({ say "hello" }).WHAT;
16:59 p6eval rakudo e33d20: OUTPUT«hello␤Bool()␤»
16:59 s1n pmichaud: does that release have parrot in it?
16:59 pmichaud s1n: the tarballs don't ever include the parrot code
16:59 carlin rakudo: say { (true) }
16:59 p6eval rakudo e33d20: OUTPUT«Unable to parse block; couldn't find final '}' at line 2, near "(true) }"␤in Main (src/gen_setting.pm:3469)␤»
16:59 carlin rakudo: say { (false) }
16:59 p6eval rakudo e33d20: OUTPUT«_block50␤»
16:59 dolmen rakudo: say (say "hello").WHAT
16:59 p6eval rakudo e33d20: OUTPUT«hello␤Bool()␤»
16:59 pmichaud note that "true" is a prefix operator, not a constant
17:00 pmichaud i.e., it's the opposite of "not"
17:00 dolmen return value of "say" is Bool ?
17:00 pmichaud dolmen: yes.
17:01 * dolmen is reading S32
17:01 pmichaud S32 sayeth:
17:01 pmichaud "=item multi print (*@LIST --> Bool)
17:01 pmichaud Stringifies each element, concatenates those strings, and sends the
17:01 pmichaud result to the output.
17:01 pmichaud Returns C<Bool::True> if successful, C<Failure> otherwise.
17:02 colomon rakudo: say (1i).PARROT
17:02 p6eval rakudo e33d20: OUTPUT«Complex␤»
17:03 dolmen rakudo: my $x = IO.new;
17:03 p6eval rakudo e33d20:  ( no output )
17:03 dolmen rakudo: my $x = IO.new; "hello".say $x;
17:03 pmichaud rakudo: (sub { say "hello" #`(hello) }).()
17:03 p6eval rakudo e33d20: OUTPUT«Confused at line 2, near "$x;"␤in Main (src/gen_setting.pm:3469)␤»
17:03 p6eval rakudo e33d20: OUTPUT«hello␤»
17:04 dolmen rakudo: say PROCESS.PARROT
17:04 p6eval rakudo e33d20: OUTPUT«Null PMC access in getprop()␤in Main (src/gen_setting.pm:3469)␤»
17:04 dolmen rakudo: say PROCESS
17:04 p6eval rakudo e33d20: OUTPUT«Null PMC access in getprop()␤in Main (src/gen_setting.pm:3469)␤»
17:04 pmichaud rakudo doesn't recognize PROCESS as a namespace yet
17:04 pmichaud rakudo:  say CORE::PROCESS
17:04 p6eval rakudo e33d20: OUTPUT«invoke() not implemented in class 'Undef'␤in Main (/tmp/2u5dPR6soW:2)␤»
17:05 dolmen rakudo: say CORE::PROCESS.WHAT
17:05 pmichaud rakudo:  say CORE::PROCESS.PARROT
17:05 p6eval rakudo e33d20: OUTPUT«invoke() not implemented in class 'Undef'␤in Main (/tmp/BPqJjDTRC1:2)␤»
17:05 p6eval rakudo e33d20: OUTPUT«invoke() not implemented in class 'Undef'␤in Main (/tmp/0nABO76SyX:2)␤»
17:05 pmichaud yeah -- it doesn't have a good understanding of namespaces yet
17:05 pmichaud especially the lexical handling of namespace names
17:07 dolmen rakudo: my $x = IO.new; ("hello".say $x) or say "Error";
17:07 p6eval rakudo e33d20: OUTPUT«Confused at line 2, near "$x) or say"␤in Main (src/gen_setting.pm:3469)␤»
17:07 dolmen rakudo: my $x = IO.new; ("hello".say($x)) or say "Error";
17:07 p6eval rakudo e33d20: OUTPUT«too many arguments passed (2) - 1 param expected␤in Main (/tmp/vrHegd1XPN:2)␤»
17:07 pmichaud the .say method doesn't expect an argument
17:08 pmichaud ah... but it's supposed to.
17:08 pmichaud rakudobug.
17:10 dolmen rakudo: say OUT.WHAT;
17:10 p6eval rakudo e33d20: OUTPUT«Could not find non-existent sub OUT␤»
17:11 dolmen rakudo: say $*OUT.WHAT;
17:11 p6eval rakudo e33d20: OUTPUT«IO()␤»
17:11 dolmen rakudo: "hello".say($*OUT);
17:11 p6eval rakudo e33d20: OUTPUT«too many arguments passed (2) - 1 param expected␤in Main (/tmp/wFKyaBd8df:2)␤»
17:12 dolmen rakudo: $*OUT.say "hello";
17:12 p6eval rakudo e33d20: OUTPUT«Confused at line 2, near "\"hello\";"␤in Main (src/gen_setting.pm:3469)␤»
17:12 dolmen rakudo: say $*OUT.ins;
17:13 p6eval rakudo e33d20: OUTPUT«␤»
17:13 dolmen rakudo: say $*OUT.outs;
17:13 p6eval rakudo e33d20: OUTPUT«Method 'outs' not found for invocant of class 'IO'␤»
17:13 dolmen rakudo: say $*OUT.outs();
17:13 p6eval rakudo e33d20: OUTPUT«Method 'outs' not found for invocant of class 'IO'␤»
17:14 dolmen rakudo: say $*OUT.isWriteable;
17:14 p6eval rakudo e33d20: OUTPUT«Method 'isWriteable' not found for invocant of class 'IO'␤»
17:14 carlin rakudo: say $*OUT.^methods.join(', ');
17:14 p6eval rakudo e33d20: OUTPUT«printf, t, slurp, close, Scalar, ins, eof, lines, say, print, get, unpolar, sech, ord, rand, 1, 1, 1, 1, asin, 1, atanh, cosh, cosec, grep, values, 1, roots, reverse, isa, ucfirst, kv, samecase, tan, cos, capitalize, fmt, bytes, flip, does, p5chop, lc, asinh, acotan, reduce,
17:14 p6eval ..cotanh…
17:15 dolmen carlin: thx
17:15 dolmen rakudo: say $*OUT.1;
17:15 p6eval rakudo e33d20: OUTPUT«Confused at line 2, near ".1;"␤in Main (src/gen_setting.pm:3469)␤»
17:16 dolmen rakudo: say $*OUT.^methods.perl;
17:16 p6eval rakudo e33d20: OUTPUT«[{ ... }, { ... }, { ... }, { ... }, { ... }, { ... }, { ... }, { ... }, { ... }, { ... }, { ... }, { ... }, { ... }, { ... }, { ... }, { ... }, { ... }, { ... }, { ... }, { ... }, { ... }, { ... }, { ... }, { ... }, { ... }, { ... }, { ... }, { ... }, { ... }, { ... }, { ...
17:16 p6eval ..}, { …
17:16 dolmen rakudo: say $*OUT.^methods;
17:16 p6eval rakudo e33d20:
17:16 p6eval ..OUTPUT«sayprintgetprintftslurpcloseScalareofinslinesmatchacoshwordscancotanatan2lcfirstucsrandComplexkeysmappolarcislogsubstrminmaxpickfirstevalfiletranssinIntacosecjoinsubstsinhcosechacosechelemsabsendchompindexceilingtrimp5chompasecpairsunpolarsechordrandtruncatesortrindexsqrtasinintata…
17:17 dolmen rakudo: say $*OUT.kv;
17:17 p6eval rakudo e33d20: OUTPUT«0IO()<0x2b9b49517820>␤»
17:18 dolmen rakudo: say $*OUT.WHAT.^methods;
17:18 p6eval rakudo e33d20:
17:18 p6eval ..OUTPUT«sayprintgetprintftslurpcloseScalareofinslinescotanhchracotanh:d:e:fcombfloorasechatanacosroundchoptanhsplitmatchacoshwordscancotanatan2lcfirstucsrandComplexkeysmappolarcislogsubstrminmaxpickfirstevalfiletranssinIntacosecjoinsubstsinhcosechacosechabselemsendchompindexceilingtrimp5ch…
17:18 jferrero joined #perl6
17:18 pugs_svn r28422 | moritz++ | [t/spec] test for anonymous, typed invocant (RT #69206)
17:22 cognominal dolmen,  p6eval is also on #perlfr
17:23 diakopter dolmen: you can also /msg p6eval directly
17:24 dolmen cognominal, but Perl 6 monks are not on #perlfr or in private message ;)
17:24 dolmen except you
17:24 dolmen ;)
17:26 dolmen rakudo: say $*OUT.say.WHAT;
17:26 p6eval rakudo e33d20: OUTPUT«␤Bool()␤»
17:26 dolmen rakudo: say $*OUT.print.WHAT;
17:26 p6eval rakudo e33d20: OUTPUT«Bool()␤»
17:27 dolmen rakudo: say $*OUT.printf.WHAT;
17:27 p6eval rakudo e33d20: OUTPUT«No candidates found to invoke␤in Main (/tmp/3KjAamvZiD:2)␤»
17:27 dolmen rakudo: say $*OUT.printf("xx");
17:27 Zloyrusskiy joined #perl6
17:27 p6eval rakudo e33d20: OUTPUT«xx1␤»
17:27 dolmen rakudo: $*OUT.printf("xx");
17:28 p6eval rakudo e33d20: OUTPUT«xx»
17:28 dolmen rakudo: say say.WHAT;
17:28 p6eval rakudo e33d20: OUTPUT«say requires an argument at line 2, near ".WHAT;"␤in Main (src/gen_setting.pm:2563)␤»
17:28 diakopter rakudo: say &say.WHAT
17:28 p6eval rakudo e33d20: OUTPUT«␤»
17:29 dolmen rakudo: say $*OUT.&printf.WHAT;
17:29 p6eval rakudo e33d20: OUTPUT«elements() not implemented in class 'Sub'␤in Main (/tmp/iPwK5u8ApO:0)␤»
17:29 dolmen rakudo: say $*OUT.&say.WHAT;
17:29 p6eval rakudo e33d20: OUTPUT«IO()<0x2b0344268580>␤Bool()␤»
17:30 dolmen rakudo: $*OUT.printf("%05d", 5);
17:30 p6eval rakudo e33d20: OUTPUT«00005»
17:32 diakopter intersting
17:33 iblechbot joined #perl6
17:35 dolmen rakudo: say &say.WHAT;
17:35 p6eval rakudo e33d20: OUTPUT«␤»
17:36 pmichaud rakudo:  say &say.PARROT;
17:36 p6eval rakudo e33d20: OUTPUT«Perl6MultiSub␤»
17:36 pmichaud rakudo:  say &say.WHAT.PARROT;
17:36 p6eval rakudo e33d20: OUTPUT«␤»
17:40 colomon pmichaud: What is the 0-argument form of the operators you speak of in that e-mail?
17:40 zamolxes joined #perl6
17:40 pmichaud colomon:   multi sub infix:<->() { 0 }
17:40 pmichaud multi sub infix:<*> { 1 }
17:41 pmichaud multi sub infix:<~> { '' }
17:41 pmichaud oops
17:41 pmichaud add parens
17:41 pmichaud multi sub infix:<~>() { '' }
17:41 pmichaud multi sub infix:<*>() { 1 }
17:41 colomon So they return the -- shoot, I don't remember the term from group theory?
17:42 colomon + would also be 0, / would also be 1?
17:42 pmichaud although perhaps those are for the reduce forms, not the infix forms
17:42 pmichaud multi sub infix:<[-]>() { 0 }
17:43 pmichaud anyway, the table is in "Reduction operators" in S03
17:43 colomon Actually, I find myself wishing that (say) <<*>> extended the array with 1s rather than the last element.
17:43 colomon It seems like that would be much more mathematically useful.
17:44 pmichaud isnt that just
17:44 pmichaud @b <<*>> @a,1
17:44 pmichaud ?
17:44 moritz_ @a, 1 xx *
17:44 lambdabot Maybe you meant: . ? @ arr ask bf do faq ft id map pl rc v wn
17:45 pmichaud do we need the xx * if it extends the last element?
17:45 dolmen rakudo: say eval('`cat /etc/passwd`', :lang<perl5>)
17:45 p6eval rakudo e33d20:
17:45 p6eval ..OUTPUT«root:x:0:0:root:/root:/bin/bash␤daemon:x:1:1:daemon:/usr/sbin:/bin/sh␤bin:x:2:2:bin:/bin:/bin/sh␤sys:x:3:3:sys:/dev:/bin/sh␤sync:x:4:65534:sync:/bin:/bin/sync␤games:x:5:60:games:/usr/games:/bin/sh␤man:x:6:12:man:/var/cache/man:/bin/sh␤lp:x:7:7:lp:/var/spool/lpd:/bin/sh␤mail:x:8:8:m…
17:45 colomon It's that ONLY if you know @a is the short one.
17:46 colomon If it is the long one, then you are adding a superfluous element to the array.
17:46 pmichaud maybe an adverb, then
17:46 colomon pmichaud:  yeah, I was thinking that might be a good solution.
17:49 lisppaste3 colomon pasted "Example of ugly code that could use the adverb" at http://paste.lisp.org/display/87772
17:50 colomon That could be a one-liner if there were an ":extend-with" adverb.
18:03 tak11 joined #perl6
18:06 pmichaud seems like one might be able to get   @a,1 <<+>> @b,1  to work somehow if we could just remove the last element
18:10 colomon pmichaud: certainly in that example you could hack the constructor to ignore 0s at the end of the array and do @a,0 <<+>> @b, 0.
18:12 colomon but wouldn't @a <<+>> @b :extend(0) be more elegant and Perl 6ish?
18:12 pmichaud it might, yes
18:13 pmichaud anyway, maybe worth a message to p6l
18:13 pmichaud gotta run -- bbiaw
18:14 szabgab joined #perl6
18:17 NorwayGeek joined #perl6
18:26 NorwayGeek joined #perl6
18:31 NorwayGeek joined #perl6
18:35 pugs_svn r28423 | kyle++ | [t/spec] nil plan += 1
18:39 pugs_svn r28424 | diakopter++ | [vijs] argument binding in subroutines working; no multis though, yet, of course
18:39 zerhash joined #perl6
18:41 diakopter vijs: my $c=4; my $a = sub ($b) { say $b * $c; $b++; say $b + $c }; $a(3); $a(4)
18:41 p6eval vijs 28422: OUTPUT«12␤8␤16␤9␤»
18:42 diakopter perl6: my $c=4; my $a = sub ($b) { say $b * $c; $b++; say $b + $c }; $a(3); $a(4)
18:42 p6eval rakudo e33d20: OUTPUT«12␤Cannot assign to readonly variable.␤in sub _block55 (/tmp/LVF8tZm9zL:1)␤called from Main (/tmp/LVF8tZm9zL:0)␤»
18:42 p6eval ..pugs: OUTPUT«12␤*** Can't modify constant item: VInt 3␤    at /tmp/HmBqYSps5L line 1, column 42-46␤»
18:42 p6eval ..elf 28424: OUTPUT«12␤8␤16␤9␤»
18:42 diakopter o
18:43 diakopter named arguments aren't rw by default?
18:44 colomon diakopter: as far as I know they are ro by default.
18:44 icwiener joined #perl6
18:45 mberends diakopter: that's correct. you can change that with 'is rw' or 'is copy'.
18:46 * diakopter deciding whether to detect/implement that yet, or leave them all rw for now :)
18:47 mberends diakopter: leave 'em, there will be spectests enough to remind you later ;)
18:47 diakopter I mean, now that rw is done, ro is 'easy'
18:47 diakopter but it's just an optimization hint, anyway
18:48 diakopter the default (ro) case, without the 'is rw' or 'is copy', I mean
18:49 diakopter I 'implemented' comparisons & chained comparisons, now to see how buggy my first/blind attempt was.
18:49 diakopter STD sends every comparison as a chain
18:50 diakopter std: 4<5 # breaks (in an unexpected way)
18:50 p6eval std 28424: OUTPUT«[31m===[0mSORRY![31m===[0m␤(Possible runaway string from line 1 to line 2)␤Whitespace required before < operator at /tmp/v3IvzRnQBs line 1:␤------> [32m4<[33m⏏[31m5 # breaks (in an unexpected way)[0m␤    expecting escape␤FAILED 00:02 95m␤»
18:50 diakopter ok nm; it did for me.
18:51 mberends std: 4 < 5; # with spaces
18:51 p6eval std 28424: OUTPUT«ok 00:01 95m␤»
18:51 diakopter I konw; locally it gives me a different error
18:52 diakopter vijs: 4<5
18:52 p6eval vijs 28424: OUTPUT«Can't locate ToJS.pm in @INC (@INC contains: .. /etc/perl /usr/local/lib/perl/5.10.0 /usr/local/share/perl/5.10.0 /usr/lib/perl5 /usr/share/perl5 /usr/lib/perl/5.10 /usr/share/perl/5.10 /usr/local/lib/site_perl .) at vivjs line 7.␤BEGIN failed--compilation aborted at vivjs line
18:52 p6eval ..7.␤»
18:52 diakopter sigh
18:52 diakopter vijs: 4<5
18:52 p6eval vijs 28424: OUTPUT«[31m===[0mSORRY![31m===[0m␤(Possible runaway string from line 1 to line 2)␤Whitespace required before < operator at /tmp/yPsfPWiJhf line 1:␤------> [32m4<[33m⏏[31m5[0m␤    expecting escape␤»
18:52 diakopter ok, it's just me.
18:53 diakopter for the curious: Can't locate object method "cursor_singleton" via package "STD::Q::_X_SQq::_X_SQw1::_X_SsLt_Gt" at ../STD.pm line 23347.
19:10 pugs_svn r28425 | diakopter++ | [vijs] implemented [chained] comparisons; implemented infix_Lt for Int; more comparison operators to come.
19:11 s1n_mini joined #perl6
19:13 pugs_svn r28426 | mberends++ | [vivjs/Makefile] 'make test' proves t/*.t and it passes 1/1 tests
19:15 nErVe joined #perl6
19:16 diakopter vijs: say 4 < 5 < 6, 4 < 3 < 5
19:16 p6eval vijs 28424: OUTPUT«10␤»
19:17 rfordinal left #perl6
19:18 diakopter vijs: say 4 < 5 < 6, 4 < 3 < 5
19:18 pugs_svn r28427 | diakopter++ | [vijs] fixing off-by-one typo (not a thinko, I do say!)
19:18 p6eval vijs 28426: OUTPUT«10␤»
19:18 diakopter vijs: say 4 < 5 < 6, 4 < 4
19:18 p6eval vijs 28426: OUTPUT«10␤»
19:18 diakopter <whew>
19:20 rhr_ joined #perl6
19:20 diakopter mberends: do you want to implement the rest of the Int comparisons?
19:21 diakopter you don't need to change interp.js; just builtins.js... just copy/paste the existing do_infix__S_Lt (where it appears in both places)
19:21 diakopter e.g. to infix__S_LtEqual
19:22 diakopter vijs: 4 <= 4
19:22 p6eval vijs 28426: OUTPUT«execute(): execute error: infix__S_LtEqual not yet implemented; srsly!!?!?? at vivjs line 66.␤»
19:22 mberends diakopter: I must learn exactly, but with your guidance, sure. I'm here to learn :)
19:22 diakopter I'll do that one, then you just have to model that one commit
19:22 mberends :)
19:24 diakopter there
19:24 pugs_svn r28428 | diakopter++ | [vijs] implement infix__S_LtEqual
19:25 araujo joined #perl6
19:25 diakopter vijs: say 4 <= 4
19:25 p6eval vijs 28426: OUTPUT«1␤»
19:25 diakopter mberends: do you know where the visual diff site is?
19:25 diakopter http://perlcabal.org/svn/pugs/revision
19:26 * mberends looks
19:26 mberends very copy/paste friendly, ok
19:27 diakopter yep; not much work required when just wrapping another library
19:27 diakopter (libBigInt)
19:28 diakopter you just have to try it once to see what to name the method:
19:29 diakopter vijs: say 4 >= 5
19:29 p6eval vijs 28426: OUTPUT«execute(): execute error: infix__S_GtEqual not yet implemented; srsly!!?!?? at vivjs line 66.␤»
19:29 mberends aha, the error message tells what to patch
19:29 mberends :)
19:30 diakopter yep; just prepend do_
19:30 diakopter don't do EqualEqualEqual, but do do EqualEqual :)
19:31 mberends fair enough, === implies class-y things probably
19:34 diakopter the way I did the comparison "methods" there, I'm going to convert the existing stuff to use the same type of dispatch for the builtins, so that I can make 'dereferencing' handled automatically
19:34 scion joined #perl6
19:35 diakopter another plane flight soon, supposedly
19:35 mberends any edits of builtins.js coming?
19:36 diakopter nope
19:36 diakopter not in those sections of the file anyway
19:36 * mberends holds the builtins.js pumpkin
19:37 diakopter I'll finish up Test.pm.js on this flight, hopefully, if I'm not surrounded by unhappy infants
19:38 mberends :) bon voyage
19:39 diakopter after that comes making if/then/else blocks actually lexical blocks (which I think is correct?) and then do, while, and loop
19:39 diakopter and then array indexing
19:40 diakopter hmm.  last to board, again. &
19:41 pugs_svn r28429 | diakopter++ | [STD/vijs] Makefile snap to hopefully retain more
19:42 pugs_svn r28430 | diakopter++ | [evalbot] make vijs path correct for using shared STD build; read file
19:42 pugs_svn r28430 | revisions more simply moritz_++ moritz++
19:44 diakopter s/dereferencing/unboxing/
19:52 pugs_svn r28431 | mberends++ | [js/builtins.js] almost clone Int < and <= into > >= == and !=
19:55 mberends oops, forgot second series of clones, quickly adding...
20:01 tak11 joined #perl6
20:02 crythias joined #perl6
20:02 pugs_svn r28432 | mberends++ | [js/builtins.js] almost clone p6var < and <= into > >= == and !=
20:03 mberends this is why we (er, I) should run tests ;)
20:06 zamolxes joined #perl6
20:07 rhr joined #perl6
20:11 dalek rakudo: a65ece5 | chromatic++ | src/pmc/ (3 files):
20:11 dalek rakudo: [PMC] Changed GC markings to use PMC/STRING specific marking functions, rather
20:11 dalek rakudo: than the generic PObj one.  This adds a minor improvement in performance and a
20:11 dalek rakudo: major potential for compile-time correctness.
20:11 dalek rakudo: review: http://github.com/rakudo/rakudo/commit/a65ece545061b25acd049a309e49f84e8b2fcf8a
20:17 dalek rakudo: 834929c | chromatic++ | build/PARROT_REVISION:
20:17 dalek rakudo: Bumped up PARROT_REVISION to r41447 to take advantage of improved marking
20:17 dalek rakudo: functions.
20:17 dalek rakudo: review: http://github.com/rakudo/rakudo/commit/834929c4eed71778e6234955b35e7bc5b32fcda3
20:17 mberends vijs: say " <", 3 < 4 < 5, 4 < 4 < 5," <=", 3 <= 4 <= 5, 5 <= 4 <= 5," >", 5 > 4 > 3, 5 > 4 > 4," >=", 5 >= 4 >= 4, 5 >= 4 >= 5," ==", 5 == 5 == 5, 5 == 4 == 4," !=", 5 != 4 != 3, 5 != 5 != 4
20:17 colomon (I'm trying these patches on OS X right now.)
20:17 p6eval vijs 28432: OUTPUT« <10 <=10 >10 >=10 ==10 !=10␤»
20:18 mberends perl6: say " <", 3 < 4 < 5, 4 < 4 < 5," <=", 3 <= 4 <= 5, 5 <= 4 <= 5," >", 5 > 4 > 3, 5 > 4 > 4," >=", 5 >= 4 >= 4, 5 >= 4 >= 5," ==", 5 == 5 == 5, 5 == 4 == 4," !=", 5 != 4 != 3, 5 != 5 != 4
20:18 p6eval rakudo e33d20: OUTPUT« <10 <=10 >10 >=10 ==10 !=10␤»
20:18 p6eval ..elf 28432: OUTPUT«No viable candidate for call to multimethod infix__60(#,#,#) at (eval 146) line 3␤ at ./elf_h line 5881␤»
20:18 p6eval ..pugs: OUTPUT« <1 <=1 >1 >=1 ==1 !=1␤»
20:20 spinclad pugs: say 3 < 4 < 5
20:20 p6eval pugs: OUTPUT«1␤»
20:20 spinclad pugs: say 3 < 4 < 3
20:20 p6eval pugs: OUTPUT«␤»
20:20 spinclad pugs: say False
20:20 p6eval pugs: OUTPUT«␤»
20:22 spinclad perl6: say False
20:22 p6eval elf 28432: OUTPUT«False␤»
20:22 p6eval ..rakudo e33d20: OUTPUT«0␤»
20:22 p6eval ..pugs: OUTPUT«␤»
20:23 spinclad elf++
20:24 mberends vijs: say False
20:24 p6eval vijs 28432: OUTPUT«0␤»
20:41 PerlJam joined #perl6
20:41 rhr joined #perl6
20:41 crythias joined #perl6
20:41 nErVe joined #perl6
20:41 iblechbot joined #perl6
20:41 dolmen joined #perl6
20:41 Patterner joined #perl6
20:41 broquaint joined #perl6
20:41 sri_ joined #perl6
20:41 synth^2 joined #perl6
20:41 reqamst joined #perl6
20:41 drbean joined #perl6
20:41 wayland76 joined #perl6
20:41 dmpk2k joined #perl6
20:41 Infinoid joined #perl6
20:41 solarion joined #perl6
20:41 christine joined #perl6
20:41 buu joined #perl6
20:41 garron joined #perl6
20:41 blaze-x joined #perl6
20:41 yves joined #perl6
20:41 integral joined #perl6
20:41 Woodi joined #perl6
20:41 clkao joined #perl6
20:41 meteorjay joined #perl6
20:41 lisppaste3 joined #perl6
20:41 JarJarBinks joined #perl6
20:41 Maddingue joined #perl6
20:41 c9s joined #perl6
20:41 frodwith joined #perl6
20:41 nsh joined #perl6
20:41 Khisanth joined #perl6
20:41 kolibrie joined #perl6
20:41 Helios- joined #perl6
20:41 rjh joined #perl6
20:41 sbp joined #perl6
20:41 phenny joined #perl6
20:41 pugs_svn joined #perl6
20:41 ezra joined #perl6
20:41 devin joined #perl6
20:41 Caelum joined #perl6
20:41 avuserow joined #perl6
20:41 silug joined #perl6
20:41 jiing joined #perl6
20:41 mj41_ joined #perl6
20:41 jrtayloriv joined #perl6
20:41 mikehh joined #perl6
20:41 frew_ joined #perl6
20:41 PacoLinux joined #perl6
20:41 xinming_ joined #perl6
20:41 alester joined #perl6
20:41 elmex joined #perl6
20:41 mberends joined #perl6
20:41 Matt-W_ joined #perl6
20:41 ewilhelm_ joined #perl6
20:41 pmichaud joined #perl6
20:45 frew__ joined #perl6
20:56 pugs_svn r28433 | mberends++ | [js/builtins.js] almost clone Int compare ops to Str (lt le gt ge eq ne)
20:56 mberends vijs: say " lt","a" lt "b" lt "c", "a" lt "a" lt "b"," le","a" le "b" le "b", "a" le "b" le "a"," gt","c" gt "b" gt "a", "c" gt "c" gt "b"," ge","b" ge "b" ge "a", "c" ge "b" ge "c"," eq","a" eq "a" eq "a", "a" eq "b" eq "b"," ne","a" ne "b" ne "a", "a" ne "a" ne "b"
20:57 p6eval vijs 28432: OUTPUT« lt10 le10 gt10 ge10 eq10 ne10␤»
20:57 cogno joined #perl6
21:01 molaf joined #perl6
21:19 NorwayGeek joined #perl6
21:24 mikehh rakudo (834929c) builds on parrot r41499 - make test / make spectest (up to 284432) PASS - Ubuntu 9.04 amd64
21:24 mikehh rakudo make spectest_smolder -> #28134
21:24 mikehh that's 28432/3 for smolder
21:28 Zloyrusskiy joined #perl6
22:10 PacoLinux joined #perl6
22:12 frew__ joined #perl6
22:15 nihiliad joined #perl6
22:17 dolmen vijs?
22:29 jrtayloriv How do I iterate over the keys of a hash in NQP? Is there something like for (keys %foo) ?
22:35 jrtayloriv nm :)
22:35 crythias I like fumble:keychain
22:48 gdonald joined #perl6
22:53 darkwolf joined #perl6
22:56 dolmen rakudo: say CORE.WHAT
22:56 p6eval rakudo 834929: OUTPUT«Could not find non-existent sub CORE␤»
22:58 dolmen rakudo: say %*ENV.keys.join(', ')
22:58 p6eval rakudo 834929: OUTPUT«_, USER, PERL6LIB, LANG, LOGNAME, MAIL, SHLVL, HOME, PWD, PATH, LS_COLORS, TERM, SHELL, HISTCONTROL␤»
22:59 dolmen rakudo: say eval('`ls /tmp`', :lang<perl5>)
22:59 p6eval rakudo 834929:
22:59 p6eval ..OUTPUT«0322GNq24e␤04GO4lAs6w␤0edbcq7r0o␤0eVXTWom9q␤0GySzft0I0␤0hhH0d9PjA␤0nABO76SyX␤0nqnn57jgY␤0nSsrGE2kT␤0o7jNs2aJZ␤0O9Z8taJEN␤0rLffyUrkT␤0RsjH3DHgd␤0Wmh2HfEA9␤0zKwZ8WkpR␤10ChpqzbFA␤10EnajMtdS␤1b5dAX4TB0␤1BBZZKqCCR␤1BTRMAHtOt␤1eu9H1sm9r␤1Je0uYVcT9␤1Ng2Sv9dGL␤1oQtgPdyWA␤1vzfkD1p1Z␤1wlxkGB…
22:59 dolmen rakudo: say eval('`cat /tmp/04GO4lAs6w`', :lang<perl5>)
22:59 p6eval rakudo 834929: OUTPUT«use Safe;␤subsub␤»
23:00 dolmen rakudo: say eval('`grep WHAT /tmp/*`', :lang<perl5>)
23:00 p6eval rakudo 834929: OUTPUT«grep: /tmp/autobox-2.55: Permission denied␤grep: /tmp/autodie-2.06: Permission denied␤grep: /tmp/Module-Which-0.0207: Permission denied␤grep: /tmp/String-Truncate-0.102: Permission denied␤grep: /tmp/YAML-LibYAML-0.32: Permission denied␤/tmp/29ZF8NbvP2:say
23:00 p6eval ..say.WHAT;␤/tmp/2RVwPLls74:…
23:00 DarkWolf84 rakudo: multi sub infix{'>>+'}(Int @array, Int $var){ my @return; for @array->$item { push (@return, $item + $var)} return @return;}; (<1 2 3> >>+ 1).say;
23:00 p6eval rakudo 834929: OUTPUT«Confused at line 2, near "(Int @arra"␤in Main (src/gen_setting.pm:3469)␤»
23:01 DarkWolf84 rakudo: multi sub infix<-_-(Int @array, Int $var){ my @return; for @array->$item { push (@return, $item + $var)} return @return;}; (<1 2 3> -_- 1).say;
23:01 p6eval rakudo 834929: OUTPUT«Malformed routine definition at line 2, near "infix<-_-("␤in Main (src/gen_setting.pm:3469)␤»
23:02 DarkWolf84 rakudo: multi sub infix:{'>>+'}(Int @array, Int $var){ my @return; for @array->$item { push (@return, $item + $var)} return @return;}; (<1 2 3> >>+ 1).say;
23:02 p6eval rakudo 834929: OUTPUT«Confused at line 2, near "return @re"␤in Main (src/gen_setting.pm:3469)␤»
23:02 DarkWolf84 rakudo: multi sub infix:<-_->(Int @array, Int $var){ my @return; for @array->$item { push (@return, $item + $var)} return @return;}; (<1 2 3> -_- 1).say;
23:02 p6eval rakudo 834929: OUTPUT«Confused at line 2, near "return @re"␤in Main (src/gen_setting.pm:3469)␤»
23:03 DarkWolf84 rakudo: multi sub infix:<-_->(Int @array, Int $var){ my @return; for @array->$item { push (@return, $item + $var)} return @return;} (<1 2 3> -_- 1).say;
23:03 p6eval rakudo 834929: OUTPUT«Confused at line 2, near "return @re"␤in Main (src/gen_setting.pm:3469)␤»
23:04 DarkWolf84 rakudo: multi sub infix:<-_->(Int @array, Int $var){ my @return; for @array->$item { push (@return, $item + $var);} return @return;}; (<1 2 3> -_- 1).say;
23:04 p6eval rakudo 834929: OUTPUT«Confused at line 2, near "return @re"␤in Main (src/gen_setting.pm:3469)␤»
23:04 colomon DarkWolf84: probably need a semicolon after the for block?
23:04 DarkWolf84 ok
23:04 DarkWolf84 i'll try
23:05 colomon rakudo: rakudo: multi sub infix:<-_->(Int @array, Int $var){ my @return; for @array->$item { push (@return, $item + $var); }; return @return;};
23:05 p6eval rakudo 834929: OUTPUT«Confused at line 2, near ": multi su"␤in Main (src/gen_setting.pm:3469)␤»
23:05 colomon rakudo: multi sub infix:<-_->(Int @array, Int $var){ my @return; for @array->$item { push (@return, $item + $var); }; return @return;};
23:05 p6eval rakudo 834929:  ( no output )
23:05 DarkWolf84 strange
23:05 colomon I left off the end bit.
23:06 colomon rakudo: multi sub infix:<-_->(Int @array, Int $var){ my @return; for @array->$item { push (@return, $item + $var); }; return @return;};  (<1 2 3>  -_- 1).say;
23:06 p6eval rakudo 834929: OUTPUT«No applicable candidates found to dispatch to for 'infix:-_-'␤in Main (/tmp/aQeMts6saC:0)␤»
23:06 DarkWolf84 is there way to enter '>' char in infix:<>
23:06 colomon rakudo: say <1 2 3>.WHAT
23:06 p6eval rakudo 834929: OUTPUT«List()␤»
23:06 colomon rakudo: say <1 2 3>.perl
23:06 p6eval rakudo 834929: OUTPUT«["1", "2", "3"]␤»
23:06 colomon It's an array of strings.
23:07 DarkWolf84 too bad
23:07 colomon rakudo: multi sub infix:<-_->(Int @array, Int $var){ my @return; for @array->$item { push (@return, $item + $var); }; return @return; }; ((1, 2, 3) -_- 1).say;
23:07 p6eval rakudo 834929: OUTPUT«No applicable candidates found to dispatch to for 'infix:-_-'␤in Main (/tmp/kKs2TfRaqJ:0)␤»
23:07 DarkWolf84 it shouldn't be like that
23:07 colomon I agree, at a first approx.
23:09 DarkWolf84 i want to get ' >>+', '>>*' etc ops in rakudo
23:10 DarkWolf84 but I can't get '>' char in infix:<>
23:12 DarkWolf84 like my Obj.^methods(:local)>>.say
23:16 DarkWolf84 btw the above program works on my computer when it's in file
23:18 colomon Wait, what do you want >>+ to do?
23:20 DarkWolf84 any element should add the $var to it's value
23:21 colomon >>+>> should do that without modifying...
23:21 colomon gotta run,alas....
23:22 DarkWolf84 ok
23:22 DarkWolf84 rakudo: <1,2,3> >>+>> 1
23:22 p6eval rakudo 834929:  ( no output )
23:22 DarkWolf84 hm
23:23 zpmorgan joined #perl6
23:23 DarkWolf84 oops
23:23 DarkWolf84 rakudo: (<1,2,3> >>+>> 1).say
23:23 p6eval rakudo 834929: OUTPUT«2␤»
23:24 DarkWolf84 no it's not that
23:25 DarkWolf84 the output must be 234
23:27 DarkWolf84 rakudo: <foo bar baz> >>.say
23:27 p6eval rakudo 834929: OUTPUT«Confused at line 2, near ">>.say"␤in Main (src/gen_setting.pm:3469)␤»
23:28 DarkWolf84 rakudo: ("foo", "bar", "baz") >>.say
23:28 p6eval rakudo 834929: OUTPUT«Confused at line 2, near ">>.say"␤in Main (src/gen_setting.pm:3469)␤»
23:30 DarkWolf84 1.^methods(:local)>>.say
23:30 DarkWolf84 rakudo: 1.^methods(:local)>>.say
23:30 p6eval rakudo 834929: OUTPUT«Str␤sec␤Int␤pred␤succ␤Num␤WHICH␤ACCEPTS␤perl␤abs␤Scalar␤Rat␤»
23:31 DarkWolf84 why that works only here
23:31 DarkWolf84 :(
23:31 DarkWolf84 where I'm wrong
23:32 DarkWolf84 1.^methods(:local).perl.say
23:33 DarkWolf84 rakudo: 1.^methods(:local).perl.say
23:33 p6eval rakudo 834929: OUTPUT«[{ ... }, { ... }, { ... }, { ... }, { ... }, { ... }, { ... }, { ... }, { ... }, { ... }, { ... }, { ... }]␤»
23:33 quietfanatic joined #perl6
23:34 quietfanatic rakudo: <foo bar baz>>>.say
23:34 DarkWolf84 ok <a b c> is array too
23:34 p6eval rakudo 834929: OUTPUT«foo␤bar␤baz␤»
23:34 quietfanatic It's the space.
23:34 DarkWolf84 I got it
23:35 DarkWolf84 I'm really sleepy now and make many mistakes
23:36 DarkWolf84 Is there a way to enter  > in infix:<>
23:36 DarkWolf84 ?
23:37 * diakopter looks for mberends
23:37 quietfanatic rakudo: say < \> >
23:37 p6eval rakudo 834929: OUTPUT«>␤»
23:38 pugs_svn r28434 | diakopter++ | [vijs] clean up relic
23:42 quietfanatic vijs: say 3 + 4
23:42 p6eval vijs 28433:  ( no output )
23:44 DarkWolf84 rakudo: multi sub infix:<\>_\<>(Str $a, Str $b){ return "Test"; }; say "a" >_< "b";
23:44 p6eval rakudo 834929: OUTPUT«Could not find non-existent sub _␤»
23:44 quietfanatic Oh, you mean in sub declarations?
23:45 DarkWolf84 yeah
23:45 DarkWolf84 is it posible
23:45 quietfanatic Hmm.
23:45 diakopter vijs: say 3 + 4
23:45 p6eval vijs 28433: OUTPUT«Can't locate object method "parsefile" via package "STD" (perhaps you forgot to load "STD"?) at vivjs line 32.␤»
23:45 diakopter quietfanatic: that happens sometimes, it seems... mostly when STD is rebuilding.  I'll look into it
23:45 quietfanatic sub infix:< _\>_ > ($a, $b) { say $a + $b }; 3 _>_ 4
23:46 diakopter vijs: say 3 + 4
23:46 p6eval vijs 28433: OUTPUT«7␤»
23:46 quietfanatic rakudo: sub infix:< _\>_ > ($a, $b) { say $a + $b }; 3 _>_ 4
23:46 p6eval rakudo 834929: OUTPUT«Confused at line 2, near "_>_ 4"␤in Main (src/gen_setting.pm:3469)␤»
23:46 diakopter std: sub infix:< _\>_ > ($a, $b) { say $a + $b }; 3 _>_ 4
23:46 p6eval std 28433: OUTPUT«ok 00:02 101m␤»
23:46 quietfanatic rakudo: sub infix:< __ > ($a, $b) { say $a + $b }; 3 __ 4
23:46 p6eval rakudo 834929: OUTPUT«7␤»
23:46 DarkWolf84 vijs using STD?
23:46 DarkWolf84 nice
23:46 quietfanatic DarkWolf84: I guess Rakudo can't do that yet.
23:46 DarkWolf84 ok
23:47 quietfanatic Though I don't know why > in particular doesn't work.
23:47 quietfanatic sub infix:<< _>_ >> ($a, $b) { say $a + $b }; 3 _>_ 4
23:47 diakopter rakudo: sub infix:<< >>>> >> ($a, $b) { say $a + $b }; 3 >>>> 4
23:47 p6eval rakudo 834929: OUTPUT«Malformed routine definition at line 2, near "infix:<< >"␤in Main (src/gen_setting.pm:3469)␤»
23:48 quietfanatic rakudo: sub infix:<< _>_ >> ($a, $b) { say $a + $b }; 3 _>_ 4
23:48 DarkWolf84 I think <a> is the same as ('a')
23:48 p6eval rakudo 834929: OUTPUT«7␤»
23:48 crythias Can't open perl script "STD_syntax_highlight": No such file or directory
23:48 diakopter crythias: :P
23:48 diakopter yeah it needs to be STD_syntax_hitlite
23:48 quietfanatic Looks like it works if you don't use single angles.
23:48 diakopter hilite
23:48 * diakopter goes to fix
23:48 crythias ...
23:48 crythias what? it's not *my* fault.
23:49 crythias I'm just the messenger.
23:50 DarkWolf84 uietfanatic: thaks anyway
23:50 pugs_svn r28435 | diakopter++ | [vijs] attempt to fix std_syntax_highlight dir
23:51 diakopter evalbot control restart
23:51 p6eval joined #perl6
23:51 diakopter /msg p6eval say 3
23:51 diakopter better, sorta
23:51 diakopter oops, wrong [vijs] there..
23:52 DarkWolf84 bye all
23:52 DarkWolf84 left #perl6
23:55 zpmorgan I just watched Larry Wall's talk at google, and was impressed by his number of workspaces
23:56 quietfanatic Yeah, he uses 15.
23:57 quietfanatic He like to keep a maximized terminal on most of them, each one in a different directory/computer.
23:58 quietfanatic I only recently changed from 6 to 12.
23:58 diakopter std: say 40:5
23:58 p6eval std 28434: OUTPUT«[31m===[0mSORRY![31m===[0m␤Confused at /tmp/jXb3F3Cgzv line 1:␤------> [32msay 40[33m⏏[31m:5[0m␤    expecting any of:␤ POST␤   bracketed infix␤    infix stopper␤    postfix␤        postfix_prefix_meta_operator␤       standard stopper␤       statement modifier loop␤
23:58 p6eval ..terminator␤     whitespace␤FAILED 00:01…

| Channels | #perl6 index | Today | | Search | Google Search | Plain-Text | summary

Perl 6 | Reference Documentation | Rakudo