附加吐的问题

Question

我正在尝试使用clojure.contrib.io(1.2)append-spit附加到文件(go figure).

如果我在桌面上创建一个文本文件,作为测试,并尝试以新的repl附加到它,这就是我得到的:

user> (append-spit "/Users/ihodes/Desktop/test.txt" "frank")
Backtrace:
  0: clojure.contrib.io$assert_not_appending.invoke(io.clj:115)
  1: clojure.contrib.io$outputstream__GT_writer.invoke(io.clj:266)
  2: clojure.contrib.io$eval1604$fn__1616$G__1593__1621.invoke(io.clj:121)
  3: clojure.contrib.io$fn__1660.invoke(io.clj:185)
  4: clojure.contrib.io$eval1604$fn__1616$G__1593__1621.invoke(io.clj:121)
  5: clojure.contrib.io$append_writer.invoke(io.clj:294)
  6: clojure.contrib.io$append_spit.invoke(io.clj:342)
  7: user$eval1974.invoke(NO_SOURCE_FILE:1)
  8: clojure.lang.Compiler.eval(Compiler.java:5424)
  9: clojure.lang.Compiler.eval(Compiler.java:5391)
 10: clojure.core$eval.invoke(core.clj:2382)
 11: swank.commands.basic$eval_region.invoke(basic.clj:47)
 12: swank.commands.basic$eval_region.invoke(basic.clj:37)
 13: swank.commands.basic$eval807$listener_eval__808.invoke(basic.clj:71)
 14: clojure.lang.Var.invoke(Var.java:365)
 15: user$eval1972.invoke(NO_SOURCE_FILE)
 16: clojure.lang.Compiler.eval(Compiler.java:5424)
 17: clojure.lang.Compiler.eval(Compiler.java:5391)
 18: clojure.core$eval.invoke(core.clj:2382)
 19: swank.core$eval_in_emacs_package.invoke(core.clj:94)
 20: swank.core$eval_for_emacs.invoke(core.clj:241)
 21: clojure.lang.Var.invoke(Var.java:373)
 22: clojure.lang.AFn.applyToHelper(AFn.java:169)
 23: clojure.lang.Var.applyTo(Var.java:482)
 24: clojure.core$apply.invoke(core.clj:540)
 25: swank.core$eval_from_control.invoke(core.clj:101)
 26: swank.core$eval_loop.invoke(core.clj:106)
 27: swank.core$spawn_repl_thread$fn__489$fn__490.invoke(core.clj:311)
 28: clojure.lang.AFn.applyToHelper(AFn.java:159)
 29: clojure.lang.AFn.applyTo(AFn.java:151)
 30: clojure.core$apply.invoke(core.clj:540)
 31: swank.core$spawn_repl_thread$fn__489.doInvoke(core.clj:308)
 32: clojure.lang.RestFn.invoke(RestFn.java:398)
 33: clojure.lang.AFn.run(AFn.java:24)
 34: java.lang.Thread.run(Thread.java:637)

这显然不是我想要的.

我想知道是否有其他人有这些问题,或者我是否做错了什么？我附加的文件没有打开(至少是我).我不知所措.

非常感谢!

Answer 1

我注意到相关的功能在1.2中被标记为已弃用,但我也认为,正如所写,他们有一些需要熨烫的错误.

首先,一种不贬低的方式来做你想做的事情(对我来说很好):

(require '[clojure.java.io :as io])

(with-open [w (io/writer (io/file "/path/to/file")
                         :append true)]
  (spit w "Foo foo foo.\n"))

(跳过io/file并简单地传递字符串io/writer也会起作用 - 我更喜欢使用包装器部分地作为个人品味而部分使用,因此c.j.io不会尝试将字符串视为URL(仅通过异常退出)在这种情况下寻找一个文件),这是它的首选解释.)

至于为什么我认为clojure.contrib.io可能会遇到一个错误:

(require '[clojure.contrib.io :as cio])

(with-bindings {#'cio/assert-not-appending (constantly true)}
  (cio/append-spit "/home/windfall/scratch/SO/clj/append-test.txt" "Quux quux quux?\n"))

这不会抱怨,但它也不会附加到文件中 - 而是替换当前内容.我还不确定究竟是什么问题,但切换到clojure.java.io应该避免它.(显然这需要进一步调查 - 不推荐的代码仍然不应该是错误的 - 我会试着解决它.)