如何仅在 GNU Smalltalk 上获取密钥？

Question

我目前正在使用 sortedCollection 存储字符（键）字典和​​该字符（值）的出现次数。 迭代 sortedCollection 时，如何仅访问键值？

例如

[que last notNil] whileTrue: [
    stdout << 'current character is ' *key* << ' and occurs << *val* << ' times.' << nl.
]

其中que是按值对字典进行排序的 sortedCollection。

我的目标如下：假设que有： [$a:20, $e:100]其中第一个字母是字典的键，第二个数字是字典的值。 我的输出应该是这样的：

current character is a and occurs 20 times. current character is e and occurs 100 times.

我不确定如何获得a或字典中的键，因为键是任意的。

Answer 1

假设que是一个排序集合，每个元素都是一个 Association，以字符为键，以计数为值，如在您的[$a:20, $e:100]示例中，您可以这样做：

que do: [:each | stdout << 'current character is ' << each key
                        << ' and occurs ' << each value << ' times.' << nl]

如果 que 是字典，请使用que keysAndValuesDo: [:char :count | stdout << "..." char << "..." count << "..." nl] que keysAndValuesDo: [:char :count | stdout << "..." char << "..." count << "..." nl] 。

根据您的整体应用程序，您还可以使用Bag ，它是一个可以多次出现的无序元素集合（而不是一个 Set，它只包含每个元素一次）。

characters := 'hello world' asBag.
characters asSet do: [:each |
    stdout << 'current character is ' << each
           << ' and occurs ' << (characters occurrencesOf: each) 
           << ' times.' << nl]

您还可以查看 # sortedByCount方法，看看它是否适合您的情况。 我无法从参考资料中得知其返回的集合的结构究竟如何，因此我不会为您提供猜测的示例代码。