← All programs · Grammars and match trees

Grammars and match trees #14

Raku++ 4.0.1 prints something different from Rakudo 2026.08

Rakudo 2026.08 runs this program cleanly; the lines marked ≠ below are where the answers part. A difference is a lead, not a verdict: sometimes both are valid Raku, and sometimes Rakudo is the one that is wrong. This difference is preserved as a Rakumap finding ↗

The program

The grammar and its inputs come first. rm-dump, the same in every program of this topic, prints one line for every field of every node of the resulting Match — its text, position, .orig, .prematch, .made, its captures — so a difference in the shape of the match shows as a difference in output.

grammar G {
    regex TOP { <k0=r0> [ <.r3> <[a..c]>+ <!r2> ] }
    token r0 { \w }
    rule r1 { 'b' <[a..c]>+ \w || 'b' <[a..c]>+ 'x' || 'b' <[a..c]>+ <r0> }
    regex r2 { [ ^ || <.r1> ] <r1> [ ')' | <k1=r1> ] }
    token r3 { \w+ }
}
sub rm-q($v) { $v.defined ?? $v.raku !! 'Nil' }
sub rm-dump($m, Str $p) {
    unless $m.defined { say "$p kind Nil"; return }
    if $m ~~ Match {
        say "$p kind Match";
        say "$p str {$m.Str.raku}";
        say "$p from {$m.from}";
        say "$p to {$m.to}";
        say "$p orig {rm-q($m.orig)}";
        say "$p target {rm-q($m.target)}";
        say "$p pre {rm-q($m.prematch)}";
        say "$p post {rm-q($m.postmatch)}";
        say "$p made {rm-q($m.made)}";
        for $m.list.kv -> $i, $c { rm-dump($c, $p ~ '[' ~ $i ~ ']') }
        for $m.hash.keys.sort -> $k { rm-dump($m.hash{$k}, $p ~ '<' ~ $k ~ '>') }
        # Captures that start at the same position have no specified order
        # (rakupp's varies from run to run), so ties are ordered by name.
        say "$p caps {$m.caps.sort({ .value.from, ~.key }).map({ .key ~ '=' ~ .value.Str.raku }).join(' ')}";
    }
    elsif $m ~~ Positional {
        say "$p kind List({$m.elems})";
        for $m.list.kv -> $i, $c { rm-dump($c, $p ~ '.' ~ $i) }
    }
    else { say "$p kind {$m.^name}" }
}
my @inputs = "c_b", "b_2abb", "1bb=ab";
for @inputs.kv -> $i, $in {
    say "#$i input {$in.raku}";
    rm-dump(G.subparse($in), '@' ~ $i);
}

Run executes the program in your browser, with the Raku++ build this site ships. Edit it and try variations.

What each compiler printed

Rakudo 2026.08Raku++ 4.0.1
input "c_b"
$/ kindMatchNil
$/ str""
$/ from0
$/ to-3
$/ orig"c_b"
$/ target"c_b"
$/ pre""
$/ post"c_b"
$/ madeNil
$/ caps
input "b_2abb"
$/ kindMatchNil
$/ str""
$/ from0
$/ to-3
$/ orig"b_2abb"
$/ target"b_2abb"
$/ pre""
$/ post"abb"
$/ madeNil
$/ caps
input "1bb=ab"
$/ kindMatchNil
$/ str""
$/ from0
$/ to-3
$/ orig"1bb=ab"
$/ target"1bb=ab"
$/ pre""
$/ post"=ab"
$/ madeNil
$/ caps