2

编辑： 在发布我的问题的先前版本后，我发现真正的问题在于嵌套函数。

如果我在 a 中有一个闭包，deftype我将无法从该闭包中更新任何可变字段。

例如以下作品：

(deftype Test [^:unsynchronized-mutable x]
    TestInterface
    (perform [this o] (set! x o)))

但这不会：

(deftype Test [^:unsynchronized-mutable x]
    TestInterface
    (perform [this o] (fn [] (set! x o)) nil)) ; throws a compiler error about assigning to non-mutable field

有什么办法可以到达并进入该领域？这样做(set! (.x this) o)会导致：

ClassCastException user.Test 无法转换为 compile__stub.user.Test user.Test/fn--152 (NO_SOURCE_FILE:3

尝试运行代码时。

完整性代码TestInterface：

(definterface TestInterface (perform [o]))
4

1 回答 1

3

考虑到不起作用的版本，如果它确实起作用，会返回一个闭包，该闭包可能会逃到野外并从任何地方被调用，从而设置您不同步的本地并把事情搞得一团糟。

如果你坚持做这种事情，你总是可以为你的可变字段创建一个带有 setter 的接口，在你的类型中实现它，并在你需要设置这个字段的任何地方调用 setter。

直接变异 ( (set! (.-x foo) ...)) 不起作用，因为 Clojure 类型（非同步和易失）的可变字段是私有的。

于 2013-08-14T21:12:47.117 回答