Re: [perl #60828] [BUG] ^...@list returns ridicously long lists

2008-11-25 Thread Patrick R. Michaud
Currently Rakudo is treating [EMAIL PROTECTED] as though it's prefix:<^> on a List, which S03 says If [prefix:<^> is] applied to a list, it generates a multidimensional set of subscripts. for ^(3,3) { ... } # (0,0)(0,1)(0,2)(1,0)(1,1)(1,2)(2,0)(2,1)(2,2) So, Rakudo is currently seei

Re: [perl #60820] Infinite pretzel recursion in Rakudo when filling a variable with an array in which one of the elements is the old value of that variable

2008-11-25 Thread Patrick R. Michaud
On Tue, Nov 25, 2008 at 12:36:45PM -0800, Carl Mäsak wrote: > rakudo: my $a = 5; $a = [ $a, 6 ]; say $a > rakudo 33193: OUTPUT[maximum recursion depth exceeded␤current > instr.: 'parrot;List;get_string' pc 2808 (src/gen_builtins.pir:1885)␤] > jnthn: I think you should see this. > masak: File ra

Re: [perl #59360] Rakudo thinks that unrecognized --flags are files

2008-11-25 Thread Patrick R. Michaud
On Fri, Sep 26, 2008 at 02:55:36AM -0700, Carl Mäsak wrote: > Rakudo r31409 assumes that all flags that it hasn't heard about are > program files. > > $ ./perl6 --help > ./perl6 > Usage: perl6 [switches] [--] [programfile] [arguments] > [...] > $ ./perl6 --kelp # a kind of seaweed > Error: file ca

[perl #60820] Infinite pretzel recursion in Rakudo when filling a variable with an array in which one of the elements is the old value of that variable

2008-11-25 Thread Carl Mäsak
# New Ticket Created by "Carl Mäsak" # Please include the string: [perl #60820] # in the subject line of all future correspondence about this issue. # http://rt.perl.org/rt3/Ticket/Display.html?id=60820 > rakudo: my $a = 5; $a = [ $a, 6 ]; say $a rakudo 33193: OUTPUT[maximum recursion depth

[perl #60828] [BUG] ^...@list returns ridicously long lists

2008-11-25 Thread via RT
# New Ticket Created by Moritz Lenz # Please include the string: [perl #60828] # in the subject line of all future correspondence about this issue. # http://rt.perl.org/rt3/Ticket/Display.html?id=60828 > Rakudo r33209: > my @a = 1; say ([EMAIL PROTECTED]).elems; # fine 1 > my @a = ; say

[perl #60826] Subset types and lexicals don't mix

2008-11-25 Thread via RT
# New Ticket Created by Moritz Lenz # Please include the string: [perl #60826] # in the subject line of all future correspondence about this issue. # http://rt.perl.org/rt3/Ticket/Display.html?id=60826 > Rakudo r33193: > my $x = 5; subset MyInt of Int where { $^num % $x == 0}; my MyInt $a =

[perl #60822] [TODO] lexical subroutines

2008-11-25 Thread via RT
# New Ticket Created by Moritz Lenz # Please include the string: [perl #60822] # in the subject line of all future correspondence about this issue. # http://rt.perl.org/rt3/Ticket/Display.html?id=60822 > Rakudo as of r33193 doesn't implement lexical subroutines; neither 'my sub ...' is implem

Re: [perl #57968] Fix issues with Int type constraint and Integer PMCs

2008-11-25 Thread Jonathan Worthington
Patrick R. Michaud via RT wrote: Is this still an issue? If so, can we enumerate the exact things we want this ticket to address? There's nothing in this area I know of that needs addressing. I suggest closing the ticket and if we find any specific issues relating to this, we can open one w

[perl #57968] Fix issues with Int type constraint and Integer PMCs

2008-11-25 Thread Patrick R. Michaud via RT
Is this still an issue? If so, can we enumerate the exact things we want this ticket to address? Pm

[perl #57968] Fix issues with Int type constraint and Integer PMCs

2008-11-25 Thread Patrick R. Michaud via RT
Is this still an issue? If so, can we enumerate the exact things we want this ticket to address? Pm

Re: [perl #60670] Implement Texas quotes («») in Rakudo

2008-11-25 Thread Patrick R. Michaud
On Wed, Nov 19, 2008 at 07:23:38AM -0800, Carl Mäsak wrote: > Rakudo r32873 cannot parse the Unicode version of Texas quotes («»), > and misunderstands the ASCII-friendly variant (<<>>). > > $ ./perl6 -e 'say .perl' > ["a", "\$b", "c"] > $ ./perl6 -e 'my $b = "foo"; say <>.perl' > 1 > $ ./perl6 -e

[perl #60716] [TODO] Remove improper regex invocation syntax

2008-11-25 Thread Patrick R. Michaud via RT
On Thu Nov 20 19:59:03 2008, [EMAIL PROTECTED] wrote: > This code works in Rakudo rev 32970: > >grammar GrammarOne { token foo { 'foo' }; } >grammar GrammarTwo { token foobar { 'bar' }; } >'foobar' ~~ GrammarTwo::foobar or die 'failed one-level namespace > grammar'; > > But this co

[perl #58854] Lexicals workaround for gather

2008-11-25 Thread Patrick R. Michaud via RT
Removed workaround in r33203, thanks! Pm

Re: [perl #59680] Build error: tools/build/ops2pm.pl: Could not mkdir /home/moritz/src/parrot/lib/Parrot/OpLib: File exists!

2008-11-25 Thread Mark Glines
Will Coleda wrote: On Tue, Nov 25, 2008 at 2:18 PM, Mark Glines via RT <[EMAIL PROTECTED]> wrote: On Sat Oct 18 12:13:51 2008, [EMAIL PROTECTED] wrote: There's a race condition, if that directory doesn't exist and multiple processes execute that code simultaneously. Fortunately, Parrot::Ops2pm

Re: [perl #59680] Build error: tools/build/ops2pm.pl: Could not mkdir /home/moritz/src/parrot/lib/Parrot/OpLib: File exists!

2008-11-25 Thread Will Coleda
On Tue, Nov 25, 2008 at 2:18 PM, Mark Glines via RT <[EMAIL PROTECTED]> wrote: > On Sat Oct 18 12:13:51 2008, [EMAIL PROTECTED] wrote: >> There's a race condition, if that directory doesn't exist and multiple >> processes execute that code simultaneously. Fortunately, >> Parrot::Ops2pm::print_modu

[perl #60814] Cannot create lowercase classes in Rakudo

2008-11-25 Thread Carl Mäsak
# New Ticket Created by "Carl Mäsak" # Please include the string: [perl #60814] # in the subject line of all future correspondence about this issue. # http://rt.perl.org/rt3/Ticket/Display.html?id=60814 > rakudo: class foo { }; say foo; rakudo 33193: OUTPUT[invoke() not implemented in class

[perl #56512] [META] [BUG] ongoing lexical issues with Rakudo, PCT, and Parrot

2008-11-25 Thread Patrick R. Michaud via RT
Now fixed in r33193. Thanks, Pm

[perl #60604] closure in grep?

2008-11-25 Thread Patrick R. Michaud via RT
Now fixed in r33193: $ cat 60604 class A { method foo (@a) { @a.grep: { say @a }; # just for example, real code not so pointless } } my $o = A.new; $o.foo(['foo']); # foo $o.foo([1, 2]); # foo $ ./parrot perl6.pbc 60604 foo 1 2 1 2 $ Thanks! Pm

[perl #59082] call bug in the loop

2008-11-25 Thread Patrick R. Michaud via RT
Now fixed in r33193: $ cat 59082 my $max = 13; cl() for 1..2; # print only \n! cl(); # print 13 sub cl { $max.say }; $ ./parrot perl6.pbc 59082 13 13 13 $ Thanks, Pm

[perl #58916] [BUG] Handling lexpads are broken (once again)

2008-11-25 Thread Patrick R. Michaud via RT
Now fixed in r33193: $ cat 58916 my @reftypes = (); sub foo($a) { push @reftypes, $a; $a; }; sub bar($s) { $s('a'); } sub baz { foo('c'); } bar(&foo); say [EMAIL PROTECTED]; # output 0 instead of 1 foo('b'); say [EMAIL PROTECTED]; # output 1 as expected after first "failure" bar

[perl #58392] Recursion and for loops interact badly in Rakudo

2008-11-25 Thread Patrick R. Michaud via RT
Now fixed in r33193: $ cat 58392 sub f($l) { return() if $l <= 0; say "entering $l"; for 1..3 { f($l-1); say "looping in $l"; } } f(2); $ ./parrot perl6.pbc 58392 entering 2 entering 1 looping in 1 looping in 1 looping in 1 looping in 2 entering 1 looping in 1 loopi

[perl #56612] [BUG] Closures are broken.

2008-11-25 Thread Patrick R. Michaud via RT
Now fixed in r33193: $ cat 55612 sub times($a,$b) { $a * $b; }; sub divide($a,$b) { $a / $b; } sub make_op($op) { sub($a,$b) { $op($a,$b) } }; my $t = make_op(×); say $t(21,2); my $div = make_op(÷); say $div(42,2); $ ./parrot perl6.pbc 55612 42 21 $ Thanks, Pm

Re: S16: chown, chmod

2008-11-25 Thread Dave Whipp
Brandon S. Allbery KF8NH wrote: Still misunderstanding, I think. Yes, it will fail anyway, but in the general case you're checking to see if as a privileged process it is safe to operate on a given file. I'd actually been thinking that one would use the check in the opposite direction: if

[svn:parrot-pdd] r33187 - trunk/docs/pdds/draft

2008-11-25 Thread moritz
Author: moritz Date: Tue Nov 25 02:03:21 2008 New Revision: 33187 Modified: trunk/docs/pdds/draft/pdd14_numbers.pod Log: [cage] fix line length in PDD14 to make codetest happier; still needs a VERSION section. Modified: trunk/docs/pdds/draft/pdd14_numbers.pod

[svn:parrot-pdd] r33189 - trunk/docs/pdds/draft

2008-11-25 Thread moritz
Author: moritz Date: Tue Nov 25 02:26:39 2008 New Revision: 33189 Modified: trunk/docs/pdds/draft/pdd14_numbers.pod Log: [cage] neither line wrapping in pdd14 Modified: trunk/docs/pdds/draft/pdd14_numbers.pod == ---

Re: [perl #55386] [TODO] Remove Configure.pl -miniparrot option

2008-11-25 Thread Will Coleda
On Mon, Nov 24, 2008 at 10:37 PM, James Keenan via RT <[EMAIL PROTECTED]> wrote: > 1. Attached find a list of files containing 'miniparrot'. This list is much smaller in the 'rm_miniparrot' branch (basically restricted to t/) > 2. In most cases, you can work on a config/*/*.pm file and the > co

[svn:parrot-pdd] r33188 - trunk/docs/pdds/draft

2008-11-25 Thread moritz
Author: moritz Date: Tue Nov 25 02:15:26 2008 New Revision: 33188 Modified: trunk/docs/pdds/draft/pdd14_numbers.pod Log: [cage] some more line wrappings in pdd14 Modified: trunk/docs/pdds/draft/pdd14_numbers.pod == -

[perl #60806] Negative and differential subscripts

2008-11-25 Thread via RT
# New Ticket Created by Ilya Belikin # Please include the string: [perl #60806] # in the subject line of all future correspondence about this issue. # http://rt.perl.org/rt3/Ticket/Display.html?id=60806 > Hi! Rakudo do topic as perl 5: >my @a = ; say @a[-1]; c but in spec: http://perlcabal.

[svn:parrot-pdd] r33164 - trunk/docs/pdds

2008-11-25 Thread tene
Author: tene Date: Mon Nov 24 14:59:06 2008 New Revision: 33164 Modified: trunk/docs/pdds/pdd23_exceptions.pod Log: Add missing documentation about resuming from exceptions. jonathan++ for reporting this. Modified: trunk/docs/pdds/pdd23_exceptions.pod =

[perl #60780] Trouble when iteration variables don't add up

2008-11-25 Thread Carl Mäsak
# New Ticket Created by "Carl Mäsak" # Please include the string: [perl #60780] # in the subject line of all future correspondence about this issue. # http://rt.perl.org/rt3/Ticket/Display.html?id=60780 > rakudo: for 1..5 -> $a, $b { say $a, $b } rakudo 33137: OUTPUT[12␤34␤StopIteration␤cur

[perl #60796] There's something wrong with creating classes inside block eval

2008-11-25 Thread Carl Mäsak
# New Ticket Created by "Carl Mäsak" # Please include the string: [perl #60796] # in the subject line of all future correspondence about this issue. # http://rt.perl.org/rt3/Ticket/Display.html?id=60796 > rakudo: eval { class A { has $.x } }; say A.new(x=>5).x rakudo 33156: OUTPUT[5␤Null PM

[svn:parrot-pdd] r33165 - trunk/docs/pdds

2008-11-25 Thread tene
Author: tene Date: Mon Nov 24 15:17:18 2008 New Revision: 33165 Modified: trunk/docs/pdds/pdd23_exceptions.pod Log: Fix wording. allison++ Modified: trunk/docs/pdds/pdd23_exceptions.pod == --- trunk/docs/pdds/pdd23_e