Looks like this issue has been handled and fixed in Parrot for some time:
https://github.com/parrot/parrot/issues/860 and
https://github.com/parrot/parrot/issues/861.
Since the Parrot issues are closed I'm closing this ticket as well. (Hope
that's okay, otherwise please reopen.)
This works now (using current syntax -- e.g. :delete):
$ perl6-m -e 'my %h = a => "b"; %h{"a"} = %h{"a"} :delete; say %h.perl;'
("a" => "b").hash
I added a test to S32-hash/delete-adverb.t with the following commit:
https://github.com/perl6/roast/commit/96c87780f7
This looks good to me now:
$ perl6-m -e 'sub foo(::T $?) {}; say "alive"'
alive
$ perl6-m -e 'role A[::T $?] {}; class B does A[] {}; say "alive"'
alive
The following dies, but that's okay (from the IRC log above: " you
can't put ? on a type constraint, which ::T is parsed as").
$ perl6-m -e '
As Matthew mentioned this works now. .>>. and >>. behave the same again:
$ perl6-m -e 'say ( { 1 + 1 }, { 2 + 2 } ).>>.().perl'
(2, 4)
$ perl6-m -e 'say ( { 1 + 1 }, { 2 + 2 } )>>.().perl'
(2, 4)
I added a test to S03-metaops/hyper.t with the following commit:
https://github.com/perl6/roast/com
Now the first code snippet also seems to work:
$ perl6-m -e 'sub infix:<+-*/>($a, $b) { ( { $a + $b }, { $a - $b }, { $a * $b
}, { $a / $b } )>>.() }; say 5+-*/2;'
7 3 10 2.5
I added a test for that one to S03-metaops/hyper.t with the following commit:
https://github.com/perl6/roast/commit/85bf
Branch: refs/heads/master
Home: https://github.com/perl6/specs
Commit: ab289f425229f89d9ae3499ef02f3e408ef03777
https://github.com/perl6/specs/commit/ab289f425229f89d9ae3499ef02f3e408ef03777
Author: pmichaud
Date: 2014-10-13 (Mon, 13 Oct 2014)
Changed paths:
M S02-bits.
Branch: refs/heads/master
Home: https://github.com/perl6/specs
Commit: 116e309177449fdf3907ca0fb68b2318cbc34989
https://github.com/perl6/specs/commit/116e309177449fdf3907ca0fb68b2318cbc34989
Author: Elizabeth Mattijsen
Date: 2014-10-13 (Mon, 13 Oct 2014)
Changed paths:
Branch: refs/heads/master
Home: https://github.com/perl6/specs
Commit: fe47b034923e13df6243d7740442c29c8b8d853f
https://github.com/perl6/specs/commit/fe47b034923e13df6243d7740442c29c8b8d853f
Author: Elizabeth Mattijsen
Date: 2014-10-13 (Mon, 13 Oct 2014)
Changed paths:
Branch: refs/heads/master
Home: https://github.com/perl6/specs
Commit: 83d4beb4ef1fe64639edacd154e0aade6502e54f
https://github.com/perl6/specs/commit/83d4beb4ef1fe64639edacd154e0aade6502e54f
Author: TimToady
Date: 2014-10-13 (Mon, 13 Oct 2014)
Changed paths:
M S17-concu
The tests are in S06-signature/optional.t and S14-roles/parameterized-basic.t,
respectively. They were added with the following commit:
https://github.com/perl6/roast/commit/2b3bee5223
On Thu May 15 12:43:22 2014, moritz wrote:
> m: class A { BEGIN {say A.^name } }
> rakudo-moar ea173d: OUTPUT«===SORRY!===Cannot invoke this object
> (REPR: Null, cs = 0)»
>
> This doesn't work because .^ is implemented as a dispatcher in class Mu;
> at the time the .^ call is perfor
I tried to golf this (chained assignment and test failure) a bit and found the
following:
$ perl6-m -e 'my $x; $x = 1; my @a; my $y = @a[0] = 2; say @a[0]'
2
$ perl6-m -e 'my $x; ($x) = 1; my @a; my $y = @a[0] = 2; say @a[0]'
(Any)
The following looks weird as well:
$ perl6-m -e 'my $y; my @a =
Possibly this is related to the issues in ticket #122914 (bindings and term
definitions are "forgotten" in the REPL for subsequent lines).
# New Ticket Created by Chris Fields
# Please include the string: [perl #122971]
# in the subject line of all future correspondence about this issue.
# https://rt.perl.org/Ticket/Display.html?id=122971 >
I'm seeing a bug with the current implementation of the nl parameter for
IO.open. If I
This works now (again):
$ perl6-m -e '"x" ~~ /(y)? (z)*/; say $0.defined; say $1.defined;'
False
True
I added a test to S05-match/capturing-contexts.t with the following commit:
https://github.com/perl6/roast/commit/ae245a65f6
15 matches
Mail list logo