[perl #75900] Different semantics in multi vs sub

[via RT]

# New Ticket Created by  jn...@jnthn.net 
# Please include the string:  [perl #75900]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=75900 >


This may, or may not, be a case of the closures bug, but:

use v6;

my @my-array = 4,2,3,4;

multi sub fsort([$p?,*...@r]) {
    return fsort(@r.grep( {$_ <= $p} )),$p,fsort(@r.grep( {$_ > $p} )) if $p || 
@r;
}

say fsort(@my-array).join(' ');


Works, and removing the "multi" breaks it.

Jonathan