my (Str $y, Int $x) := ret-test'(5);  # y=>'Smith', x=>1, so OK

##</code><code>##

my (Str $y, Int $x) := ret-test(5);  # ($x,$y) gets (1,'Smith'), WRONG