smalltalk - pharo 中的流分配

Question

我这里有一个问题。

我有一个OrderedCollection类型的data变量。

当我执行 DoIt 时，此变量向我显示:an OrderedCollection ('3c7lwmdva2b8jbt39ls4pz3sl' '3c7lwmbf36tamw1m45riirdze' 8 February 1994)。

现在我想要这个:

object:=String streamContents:
    [:stream|
    stream
    nextPutAll: 'data:= ';cr;
    print:data asArray.]

但是当我运行时，它向我显示:

data := an Array End of statement list encounteencountered -> ('3c7lwmdva2b8jbt39ls4pz3sl' '3c7lwmbf36tamw1m45riirdze' 8 February 1994).

所以这个月我想得到这个:

data := #('3c7lwmdva2b8jbt39ls4pz3sl' '3c7lwmbf36tamw1m45riirdze' 8 February 1994).

请问怎么办？

Answer 1

result := String streamContents: [:stream |
  stream nextPutAll: 'data := #('.
  data
    do: [:string | stream nextPut: $'; nextPutAll: string asString; nextPut: $']
    separatedBy: [stream space].
  stream nextPut: $)]

由于我的答案被否决，我将解释解决方案。

1. data 中有什么？问题表明 data 打印为(原始格式，抱歉)

an OrderedCollection ('3c7lwmdva2b8jbt39ls4pz3sl' '3c7lwmbf36tamw1m45riirdze' 8 February 1994).

这表明data是一个带有两个字符串和一个Date的OrderedCollection。

OP 试图计算什么？尚不清楚。使用 String streamContents: 似乎表明 OP 正在尝试生成一个 String，更准确地说是一个赋值语句，其中 data 被分配给OrderedCollection 转换为 Array。

2 的解决方案。假设我在 2 中的猜测是正确的，我上面的代码会生成这样的句子。

对于这个不明确的问题我们还能给出什么其他解释？好吧，OP 可能只是在寻找一种将 OrderedCollection 转换为 Array 的方法。在这种情况下，答案很简单

object := data asArray.

但是，给定 previous post ，同一个 OP 试图进行一些元编程，但实际意图仍不清楚。