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

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

要么：

• 使用 jnthn 的答案中的解决方案，让 Raku 明确知道您希望使用 $ sigil 的令牌变量作为 Callable。

• 首先将变量显式声明为Callable，并在调用中进行相应的更改：

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

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