Raku 中的 (Any) 是什么意思 - 特别是 ()？

Question

这是一个 Raku 的实验：

> my $x
(Any)
> my $y=1
1
> my @a=[1, 2]
[1 2]
> my %h=a=>'b'
{a => b}
> say "nil" unless $x
nil

我可以看到 [] 表示数组文字，{} 表示哈希文字。

我还可以看到 (Any) 的行为类似于 nil - 在上面显示的布尔上下文中返回 false。

我觉得(Any) 很有趣。文档告诉我Any 只是 Raku 中的神级之一。但是Any 周围的括号() 告诉我什么？

Answer 1

当您使用 REPL 时，表达式的结果显示为使用 say。 say 函数在表达式上调用 .gist 函数。

Any 是一个类型对象。类型对象有一个 .gist 方法，可以在它们周围加上括号。

put 函数与say 函数几乎相同，但它在表达式上调用.Str 函数。这会产生警告，因为您无法真正将类型对象字符串化。观察差异：

$ raku -e 'say Any'
(Any)

# raku -e 'put Any'
Use of uninitialized value of type Any in string context.
Methods .^name, .raku, .gist, or .say can be used to stringify it to something meaningful.
  in block <unit> at -e line 1

请参阅Classes and Objects、Type System、Type Objects 了解更多信息。

Answer 2

有一个非常简单的答案。

Any 是一个类。具体来说，它是所有其他类的默认基类。

在 Raku 中，您可以像传递实例一样传递类。

my $a = 1;
my $b = $a.WHAT;

say $b;
# (Int)

问题是，如果您尝试将类当作实例来使用，就会发生不好的事情。

say $b + 4;
# ERROR: … must be an object instance of type 'Int', not a type object of type 'Int'.

---

当您使用 REPL 时，它会自动调用 .gist 并打印结果。

.gist 旨在让人类能够理解其价值。

那么为什么要在类名周围加上括号呢？

这样做是为了告诉你它不是Str 或其他实例，这对我来说是有道理的。

say 'Str'; # say calls .gist
# Str

say 'abc'.WHAT;
# (Str)

say 'abc'.WHAT.^name;
# Str

say 'abc'.^name;
# Str

除了其中一个之外，所有这些都是Str 类的实例。
（猜猜是哪一个。）

---

基本上，括号会告诉您尝试将其用作实例是错误的。

Answer 3

除了 lizmat 的出色答案之外，解释这里发生的事情可能与此相关。

当你说 my $foo 时，你实际上是在说 my Any $foo。¹ 当你说 my @foo 时，你是在隐含地说更接近 my Any @foo 的东西，这是一样的作为my Array[Any] $foo（但在位置容器中）。这使您可以将任何内容放入数组中，因为它的类型是Any。

当您访问一个未定义的对象时，它会返回一个未定义的值——但该值仍然是类型化的。只是碰巧默认情况下，类型是Any。然而，我们可以改变一些东西，它可能会变得更清楚：

my Str $foo;
say $foo;    # a Str that's undefined, so '(Str)';
my $bar;     # implicitly typed Any
say $bar;    # an Any that's undefined, so '(Any)';

my Int @foo = 0, 1, 2;
say @foo[0];   # an Int defined as 0, so '0'
say @foo[1];   # an Int defined as 1, so '1'
say @foo[3];   # an Int that's undefined, so '(Int)'

正如 lizmat 在她的回答中指出的那样，(Type) 是 .gist 方法的默认表示，.say 使用该方法表示未定义的值。²

他们不返回 Nil 的原因是因为根据定义，Nil 为调用它的每个方法返回 Nil（除了一些例外，如 Bool，它返回 False）—它有点像 Objective-C 的nil。但是未定义的类型对象仍然有用途：例如，您仍然可以在其上调用方法，只要它们不访问属性。有时这可能是一个非常有用的属性，它实际上使您能够执行以下操作：

  my Foo $foo .= new;

什么是语法糖

  my Foo $foo;
  $foo = $foo.new;

$foo 是一个未定义类型的对象，所以我们实际上还是调用了Foo.new。

---

1. 正如 raiph 在 cmets 中正确指出的那样，我应该注意到这不是 确切正在发生的事情，但从最终用户的角度来看，这已经足够接近并且不那么复杂了。李>
2. 人们总是可以覆盖它，我已经为我的一些类做了这个，这些类的名称可疑地接近或与添加明确前缀的内置函数相同，因此我不会混淆它们。