造成什么原因＆＃34; Redis命令必须在与Redis服务器连接的上下文中调用＆＃34;？

Question

我正在尝试运行此代码，但我在帖子标题中收到错误。

------------------ core.clj ----------------

(def server-conn  {:pool {} :spec {:host "myhost.com" :port 12345 }} )

 (defmacro wcar* [& body] `(car/wcar server-conn ~@body))

(defn run-redis-test1 [& args]

  (wcar* 
       (car/set "foo" "bar")
       (car/get "foo")
   )
     ;; ---------------- this was the problem  (car/get "foo") OUTSIDE the (wcar*
     **(def g (car/get "foo")) ; -> ["PONG" "OK" "bar"]
     (pr "(outside war) gg1" gg1)**   
)

(defn -main  [& args]
  (run-redis-test1)
)