9

我有两个问题。首先，我需要做什么才能编译以下代码，Clojure 1.4 阅读器文字给了我哪些我无法从宏中获取的内容？

我知道我正在使用本地 data_readers.clj 文件覆盖阅读器，但是在哪里可以比我已经访问过的 Clojure 1.4 发行说明更详细地了解这些阅读器文字？

这是错误编译的代码。

java.lang.RuntimeException: No reader function for tag ?=,

项目.clj

(defproject repl-test "0.0.1-SNAPSHOT"
  :description "TODO: add summary of your project"
  :dependencies [[org.clojure/clojure "1.4.0"]
                 [org.clojure/clojure-contrib "1.2.0"]
                 [clojure-csv/clojure-csv "1.3.2"]
                 [org.clojure/tools.cli "0.1.0"]
                 [util "1.0.2-SNAPSHOT"]
                 [clj-http "0.1.3"]]
   :aot [repl-test.core]
   :main repl-test.core)

data_readers.clj（位于我的 lein 项目 repl-test 的顶部）

{
 ?= repl-test.core/debug-print
 str repl-test.core/expand-sexp
}

data_readers.clj 应该去别的地方吗？如果有，在哪里？

core.clj 的相关部分

(ns repl-test.core
  (:gen-class)
  (:require [clojure.string :as str])
  (:require [util.core :as utl])
  (:use clojure-csv.core))

(defn debug-print
  "Gauche debug print"
  [x]
  `(let [res# ~x]
     (println "?=" res#)
     res#))

(defn expand-sexp
  "Expand S-exp in string"
  [s]
  (let [ls (map-indexed #(if (even? %) %2 (read-string %2))
                        (str/split s #"`"))]
    `(apply str (list ~@ls))))

(defn -main 
  [& args]
  (println (map inc #?=(range 10)))
 
  (let [i 100]
    (println #str"i = `i`")
    (println #str"(+ 1 2 3) = `(+ 1 2 3)`")))

示例代码来自这里。

谢谢。

4

1 回答 1

9

阅读器文字让您可以创建自己的文字类型。像：

(< #meter 2 #inch 5)
(mass #molecule "H2O")

与常规宏不同，阅读器文字由阅读器处理。因此，您可以在基于 s-expression 的数据文件中使用它们，而不仅仅是代码。

列出的文字data_readers.clj必须位于类路径的根目录中。那是在src一个 lein 项目的目录中。

于 2012-08-19T06:51:40.337 回答