为什么此方法的 return 部分不起作用

Why this method's return part is not working

我正在尝试编写一个 returns 新值的方法。以下代码修改自 here

| stripChars |
stripChars := [ :string :chars |    
    str := string reject: [ :c | chars includes: c ].
    str displayNl.          "THIS WORKS."
    ^ str                   "THIS DOES NOT WORK."
].

newstr := stripChars 
    value: 'She was a soul stripper. She took my heart!'
    value: 'aei'.
newstr displayNl.

虽然上面的函数创建了新字符串并显示出来,但是在返回或接收返回的新字符串时出错:

$ gst make_fn_ques.st
Sh ws  soul strppr. Sh took my hrt!
Object: 'Sh ws  soul strppr. Sh took my hrt!' error: return from a dead method context
SystemExceptions.BadReturn(Exception)>>signal (ExcHandling.st:254)
SystemExceptions.BadReturn class(Exception class)>>signal (ExcHandling.st:151)
String(Object)>>badReturnError (Object.st:1389)
UndefinedObject>>executeStatements (make_fn_ques.st:10)
nil

问题出在哪里,如何解决?感谢您的帮助。

^ str

不是 return 来自块 (stripChars),而是来自封闭方法 (non-local return)。

显然 GNU Smalltalk 不允许您从以这种方式传递给 gst 的脚本中 return。

只需删除 ^,仅保留 str 作为该块的最后一个表达式。这将导致 str 成为块的 return 值。