[perl #129784] [BUG][NATIVECALL] Cannot assign the malloc allocated memory to the pointer in the argument.

2016-10-01 Thread via RT
# New Ticket Created by Itsuki Toyota # Please include the string: [perl #129784] # in the subject line of all future correspondence about this issue. # https://rt.perl.org/Ticket/Display.html?id=129784 > See the following codes and results. ( Sorry, it's little bit long. ) * codes * t/01-ba

Re: [perl #129776] [CUR][PERF] Extremely slow performance when running in directory with lots of modules

2016-10-01 Thread Lloyd Fournier
String concat takes On2 in rakudo I think. Using join in this kind of situation should be an improvement. (I'm commuting so can't test). On Sat, 1 Oct 2016 at 7:11 PM, Zoffix Znet wrote: > # New Ticket Created by Zoffix Znet > # Please include the string: [perl #129776] > # in the subject line

Re: Sorting Multidimentional Arrays

2016-10-01 Thread mimosinnet
El Saturday, 01 de October del 2016 a les 20:44, Moritz Lenz va escriure: On 01.10.2016 19:57, mimosinnet wrote: @opposite = @opposite.sort({@$^a[3]}); For the record, you can simplify this a bit: @opposite = @opposite.sort(*[3]); Waw! It works! Many thanks! I am still puzzled by the aste

[perl #129779] Concurrency worse than no concurrency

2016-10-01 Thread via RT
# New Ticket Created by Steve Piner # Please include the string: [perl #129779] # in the subject line of all future correspondence about this issue. # https://rt.perl.org/Ticket/Display.html?id=129779 > This could be a stupid user problem, in which case I apologise for wasting your time. S

Re: Sorting Multidimentional Arrays

2016-10-01 Thread Joan Pujol
El Saturday, 01 de October del 2016 a les 20:44, Moritz Lenz va escriure: On 01.10.2016 19:57, mimosinnet wrote: @opposite = @opposite.sort({@$^a[3]}); For the record, you can simplify this a bit: @opposite = @opposite.sort(*[3]); Waw! It works! Many thanks! I am still puzzled by the ast

Re: What are variables/parameters that start with a pipe | char

2016-10-01 Thread Moritz Lenz
Hi, On 01.10.2016 04:22, Francis (Grizzly) Smit wrote: > I keep finding stuff like this: > > multi method spurt(IO::Path:D: Blob $contents, :$bin, |c) > multi method spurt(IO::Path:D: Cool $contents, :$bin, |c) > > > but I cannot find the |c syntax in the docs I have googled but no good > a po

Re: Sorting Multidimentional Arrays

2016-10-01 Thread Moritz Lenz
Hi, On 01.10.2016 19:57, mimosinnet wrote: > I have been searching on how to sort multidimensional arrays. The > following code works and sorts the fourth column of the array: > > --- > #!/usr/bin/env perl6 > # sort multidimensional array > > my @opposite = ( > <8976 ABD AB11 6LX NJ >, >

Re: Sorting Multidimentional Arrays

2016-10-01 Thread Larry Wall
On Sat, Oct 01, 2016 at 07:57:34PM +0200, mimosinnet wrote: : @opposite = @opposite.sort({@$^a[3]}); I'd probably write that as: @opposite .= sort: { $^a[3] } or maybe just @opposite .= sort( *[3] ); Larry

Re: [perl #129781] [SEGV] when await()ing a bunch of "start ‘/etc/hostname’.IO ~~ :e"

2016-10-01 Thread Nicholas Clark
On Sat, Oct 01, 2016 at 08:14:16AM -0700, Daniel Green wrote: > # New Ticket Created by Daniel Green > # Please include the string: [perl #129781] > # in the subject line of all future correspondence about this issue. > # https://rt.perl.org/Ticket/Display.html?id=129781 > > > > await (for ^7

Sorting Multidimentional Arrays

2016-10-01 Thread mimosinnet
I have been searching on how to sort multidimensional arrays. The following code works and sorts the fourth column of the array: --- #!/usr/bin/env perl6 # sort multidimensional array my @opposite = ( <8976 ABD AB11 6LX NJ >, <8860 PLN AB12 4JS NO >, <8905 DYC AB21 7EQ

[perl #129773] [BUG] [].splice: 0, [] infiniloops

2016-10-01 Thread Zoffix Znet via RT
The original fix was not enough, as passing incorrect type to `offset` also has the same issue. Not pretty, but this commit fixes that issue: https://github.com/rakudo/rakudo/commit/b77d2b71db And tests for offset condition hang added in https://github.com/perl6/roast/commit/5d8750321d On F

[perl #129782] [JVM] Some evaluations return Int instead of Bool due to optimizer's work

2016-10-01 Thread via RT
# New Ticket Created by Christian Bartolomaeus # Please include the string: [perl #129782] # in the subject line of all future correspondence about this issue. # https://rt.perl.org/Ticket/Display.html?id=129782 > We have different tests in roast which are currently failing on JVM

[perl #129781] [SEGV] when await()ing a bunch of "start ‘/etc/hostname’.IO ~~ :e"

2016-10-01 Thread via RT
# New Ticket Created by Daniel Green # Please include the string: [perl #129781] # in the subject line of all future correspondence about this issue. # https://rt.perl.org/Ticket/Display.html?id=129781 > await (for ^7 { start ‘/etc/hostname’.IO ~~ :e }) regular perl6-valgrind-m output here:

[perl #129780] [BUG] no error about double closure when there are multiple *s in a where clause

2016-10-01 Thread via RT
# New Ticket Created by Daniel Green # Please include the string: [perl #129780] # in the subject line of all future correspondence about this issue. # https://rt.perl.org/Ticket/Display.html?id=129780 > perl6 -e 'sub foo($a where {* < 5}) { dd $a }; foo(3);' ===SORRY!=== Error while compilin

[perl #129776] [CUR][PERF] Extremely slow performance when running in directory with lots of modules

2016-10-01 Thread via RT
# New Ticket Created by Zoffix Znet # Please include the string: [perl #129776] # in the subject line of all future correspondence about this issue. # https://rt.perl.org/Ticket/Display.html?id=129776 > To reproduce: cd $(mktemp -d); git clone https://github.com/perl6/mu; touch Foo.pm6;

Initializing a CStruct attribute of a CStruct

2016-10-01 Thread Fernando Santagata
Hello, I'm trying to do something complex (at least for me :-) with NativeCall. Let's start with plain Perl6. This: class test1 { has Int $.a; has Int $.b; } class test2 { has Int $.c; has test1 $.d; } my test2 $t2 .= new(:3c, d => test1.new(:1a :2b)); dd $t2; outputs: test2 $t2

[perl #126124] [BUG] definedness constraint mismatches reported incorrectly

2016-10-01 Thread Christian Bartolomaeus via RT
With Rakudo commit we get the same output on MoarVM and JVM: $ ./perl6-j -e 'sub aa (Mu:D $a) { }; aa(Int)' Parameter '$a' requires an instance of type Mu, but a type object was passed. Did you forget a .new? in sub aa at -e line 1 in block at -e line 1 $ ./perl6-j -e 'sub aa (Mu:U $a) { }