如何将参数传递给变量引用的令牌？

Question

我可以通过直接使用令牌名称轻松使用令牌签名：

my token t ( $x ) { $x };

'axb' ~~ / 'a' <t: 'x'> 'b' /;      # match
'axb' ~~ / 'a' <t( 'x' )> 'b' /;    # match

但是，当令牌存储在变量中时，我还没有找到一种方法来做到这一点：

my $t = token ( $x ) { $x };

'axb' ~~ / 'a' <$t: 'x'> 'b' /;
'axb' ~~ / 'a' <$t( 'x' )> 'b' /;

两者都给出：

===SORRY!=== Error while compiling ...
Unable to parse expression in metachar:sym<assert>; couldn't find final '>'

这样做的神奇语法是什么？

顺便说一句：我什至浏览过 Raku 测试套件，它在roast/S05-grammar/signatures.t.

Answer 1

&在变量前放置一个：

my $t = token ( $x ) { $x };
say 'axb' ~~ / 'a' <&$t: 'x'> 'b' /;
say 'axb' ~~ / 'a' <&$t( 'x' )> 'b' /;

解析器查找&, 然后委托给 Raku 变量解析规则，它会很高兴地解析这样的上下文化器。

Answer 2

任何一个：

my &t = token ( $x ) { $x };

say 'axb' ~~ / 'a' <&t: 'x'> 'b' /;   # ?axb?
say 'axb' ~~ / 'a' <&t( 'x' )> 'b' /; # ?axb?