ClojureScript (nodejs) 函数，返回文件的字符串内容

Question

我正在尝试创建一个函数，该函数采用文件路径并将其内容作为字符串返回。这是我的代码 sn-p：

(defn get-string-from-file-path [path]
  (let [fs (node/require "fs") c (chan)]
      (.readFile fs path "utf8" (fn [err data] ((go (>! c (str data))))))
      (go (def r (str (<! c)))) ; is using def correct here?
       r))

1. 在第 4 行使用 def 是否正确/惯用？
2. 使用有效的文件路径调用此函数后，我收到以下错误：

TypeError：（中间值）（中间值）（中间值） value)(...).call 不是函数 在回复：99:6 在 tryToString (fs.js:414:3) 在 FSReqWrap.readFileAfterClose [as oncomplete] (fs.js:401:12)

奇怪的是，如果我再次调用函数，我会得到文件所需的字符串内容！这是怎么回事？

编辑：这是更正后的函数：

(defn get-string-channel-from-file-path [path] ; function is now "get string channel" instead of "get string"
  (let [fs (node/require "fs") c (chan)]
      (.readFile fs path "utf8" (fn [err data] (go (>! c data))))
        c)) ; return channel instead of string

Answer 1

1. 不，在源代码的根范围以外的任何地方使用 def 通常是一个坏主意，而且不习惯。如果您想创建另一个局部变量，那么另一个 let 表达式是可行的方法。

2. 为什么它有时会起作用，您正在使用异步函数并尝试使其同步。这导致了竞争条件。有时文件系统会在您从函数返回之前返回文件（这就是有效的原因），有时不是（错误）。

有几个选项：

• 您可以尝试使用节点的readFileSync 函数使函数同步。这样你就可以返回它返回的内容。

• 与其尝试提​​取 go 块中的数据，不如将您放入的 chan 返回到 >! 并让下一个函数在其自己的 go 块中从通道中获取数据<!。这比使用 core.async 时的回调更惯用。