[perl #117481] [BUG] duplicate keys in .gist in Match of regex which backtracked in Rakudo

2014-10-10 Thread Christian Bartolomaeus via RT
There is no longer a duplicate key in the .gist output: $ perl6-m -e "say ('/foo/bar/baz/' ~~ m/^ $=(.* '/'+)? $=(<-[\/]>+) '/'* $ /).gist" 「/foo/bar/baz/」 dirname => 「/foo/bar/」 basename => 「baz」 I added a test to S02-names-vars/list_array_perl.t (couldn't find a better place) with the follo

[perl #122939] [BUG] Rakudo can't parse version literals with several digits in the major version

2014-10-10 Thread Carl Mäsak
# New Ticket Created by "Carl Mäsak" # Please include the string: [perl #122939] # in the subject line of all future correspondence about this issue. # https://rt.perl.org/Ticket/Display.html?id=122939 > I'm pretty sure Perl 6 defines a Version type :-) m: say v6.0.0.WHAT rakudo-moar d3

[perl #112988] excessive errors when foo.pl does not exist

2014-10-10 Thread Christian Bartolomaeus via RT
I added a test (using is_run) to S19-command-line/arguments.t with the following commit: https://github.com/perl6/roast/commit/3cee096456 S19-command-line/arguments.t is a new file in roast and as such not yet included in t/spectest.data in Rakudo. I'll leave the ticket open until that is done

[perl #116016] [BUG] The rule to match routines/symbols is overriding the rule to match versions, because of LTM

2014-10-10 Thread Carl Mäsak via RT
std: say v2013.4.5 std fc92e1e: OUTPUT«===SORRY!===␤Confused at /tmp/W0MHCqFo4M line 1:␤--> say v2013.⏏4.5 [...] aha :-) looks like STD and Rakudo agree here about multi-digit version numbers I recognize this failure mode. we've encountered it before it's a longest-token-matching iss

[perl #115390] Crash (abort or segfault) when using 'but' in a loop

2014-10-10 Thread Christian Bartolomaeus via RT
These error reports are difficult to assess from one or two years later. I'm inclined to say the bugs are fixed -- though there seems to exists another bug regarding the use of "but" in a for loop. But one at a time: $ perl6-m -e 'for 1..100 -> $i { say $i; run "true"; 1; }' 1 [ ... output short