Perl 6 - the future is here, just unevenly distributed

IRC log for #perl6, 2013-04-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 BenGoldberg But somehow, I don't think that that form can be made into an infinite lazy list ;)
00:01 * BenGoldberg could be wrong, though :)
00:20 raiph http://en.wikipedia.org/wiki/Thue-Morse_sequence # odious & evil
00:21 kurahaupo BenGoldberg: isn't that sequence simply the second-to-top bit from a greys coding?
00:21 kurahaupo (or inversion thereof)?
00:22 BenGoldberg Huh?
00:22 BenGoldberg A gray coding involves an order reversal, I think.
00:22 kurahaupo grays encoding: an encoding of binary where counting up or down by one only ever flips one bit
00:23 kurahaupo 1, 11, 10, 110, 111, 101, 100, 1100 ...
00:23 kurahaupo read the second-to-left bit from each element, and I think it will read out your putative non-lazy sequence
00:24 BenGoldberg I don't see it
00:24 * kurahaupo will have to investigate more thoroughly, but they certainly look related
00:27 BenGoldberg Of course they're related, they're both made from zeros and ones!
00:27 BenGoldberg ;)
00:32 kurahaupo r: @a = 1; @a := @a, @a, map{1-$_} @a for 1..6; say @a;
00:32 camelia rakudo 37c995: OUTPUT«[31m===[0mSORRY![31m===[0m�Variable '@a' is not declared�at /tmp/_gAtpHMLcb:1�------> [32m@a[33m�[31m = 1; @a := @a, @a, map{1-$_} @a for 1..[0m�    expecting any of:�        postfix�»
00:32 kurahaupo r: my @a = 1; @a := @a, @a, map{1-$_} @a for 1..6; say @a;
00:32 camelia rakudo 37c995: OUTPUT«[31m===[0mSORRY![31m===[0m�Two terms in a row�at /tmp/5YjFPCpg87:1�------> [32mmy @a = 1; @a := @a, @a, map{1-$_} [33m�[31m@a for 1..6; say @a;[0m�    expecting any of:�        postfix�        statement end�        statement modifier�        statement modif…
00:32 kurahaupo r: my @a = 1; @a := @a, @a, map{1-$_}, @a for 1..6; say @a;
00:32 camelia rakudo 37c995: OUTPUT«===SORRY!===␤CHECK FAILED:␤Calling 'map' will never work with no arguments (line 1)␤    Expected any of:␤    :(&code, *@values)␤»
00:37 kurahaupo (drat, came in half way through that conversation and didn't scroll back far enough to see the previous mention of Grays coding)
00:54 kurahaupo r: my @a=0; @a := @a, map {1-$_}, @a for 1..6; say @a; my @b=0; @b := map {$_,1-$_}, @b for 1..6; say @b;
00:54 camelia rakudo 37c995: OUTPUT«0 1 1 0 1 0 0 1 1 0 0 1 0 1 1 0 1 0 0 1 0 1 1 0 0 1 1 0 1 0 0 1 1 0 0 1 0 1 1 0 0 1 1 0 1 0 0 1 0 1 1 0 1 0 0 1 1 0 0 1 0 1 1 0␤0 1 1 0 1 0 0 1 1 0 0 1 0 1 1 0 1 0 0 1 0 1 1 0 0 1 1 0 1 0 0 1 1 0 0 1 0 1 1 0 0 1 1 0 1 0 0 1 0 1 1 0 1 0 0 1 1 0 0 1 0 1 1 0␤»
00:55 * kurahaupo recognizes the sequence: parity on binary counting
01:01 kurahaupo In P5 roughly: @a = map { unpack( "%32b32", pack "V", $_ ) % 2 } 0 .. MAXINT
01:13 adu joined #perl6
01:42 FROGGS_ joined #perl6
02:32 daniel-s_ joined #perl6
02:32 diakopter agentzh++ (openresty++) http://www.techempower.com/benchmarks/#section=data-r3
02:33 diakopter so, I look at these benchmark numbers
02:34 diakopter and I'm forced to imagine rakudo's http server doing this
02:40 lustlife joined #perl6
02:40 diakopter my first guess is that rakudo/parrot could maybe get 1,000x slower than the fastest ones in every test
02:49 labster that's only 3 orders of magnitude -- and 1 order of magnitude from PHP
02:49 labster look at the bright side
02:50 orafu joined #perl6
02:51 diakopter o_O and in base-1000, 1 order of magnitude
02:53 bonsaikitten geeeh, why is that website so retarded ... I can't see the benchmark results
02:53 bonsaikitten people really need to remember how http works I guess
02:54 diakopter I suppose you could suspect that if it worked for less than nearly everyone..
02:55 bonsaikitten oooh. oooooooh.
02:55 bonsaikitten you need to enable javascript so that the links work
02:55 bonsaikitten I have no idea what that's supposed to mean, but at least it's futuristic
03:06 labster \o/ finally figured out how to use precompiled regexes in the setting!
03:36 labster well, that's a new one: Error while constructing error object:Could not locate compile-time value for symbol Syntax::Confused  Error while compiling, type X::Syntax::Confused at line 8526, near "my $str_no"   Still manages to be informative, though.
03:37 labster It's an error I made in the setting, so don't worry about fixing it.
03:43 Nom- joined #perl6
04:10 kaleem joined #perl6
04:20 kurahaupo1 joined #perl6
04:30 SmokeMachine joined #perl6
04:46 Psyche^ joined #perl6
04:52 kaare_ joined #perl6
05:09 SamuraiJack joined #perl6

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

Perl 6 | Reference Documentation | Rakudo