如何获取对象上的 `< ... >` 语法?

Ric*_*rth 10 object calling-convention raku

在 Raku 中:当我使用 CALL-ME 方法创建对象时,我想使用< ... >签名语法而不是( '...' )when ...is a Str。在文档中,有一个创建运算符的示例,它是具有特殊语法的普通 Raku sub。这种 sub 自动转换< ... >为 Str。例如,如果我有

use v6.d;
class A {
   has %.x;
   method CALL-ME( Str:D $key ) { say %!x{ $key } }
}

my A $q .= new( :x( <one two three> Z=> 1..* ) );
$q('two');
$q<two>;

Run Code Online (Sandbox Code Playgroud)

但这会产生

2
Type A does not support associative indexing.
  in block <unit> at test.raku line 10
Run Code Online (Sandbox Code Playgroud)

cod*_*ons 9

基于@raiph 评论的答案:

您需要AT-KEY在您的类型上实现该方法。

您可以直接这样做:

class A {
   has %.x;
   method CALL-ME( Str:D $key ) { say %!x{ $key } }
   method AT-KEY($key) { self.($key) }
}
Run Code Online (Sandbox Code Playgroud)

或者您可以通过委托使用该特征AT-KEY来做到这一点:%!xhandles

class A {
   has %.x handles <AT-KEY>;
   method CALL-ME( Str:D $key ) { say %!x{ $key } }
}
Run Code Online (Sandbox Code Playgroud)