学习不同的 Lisp 语言之间有什么协同作用吗？我目前正在学习 Emacs Lisp，因为它在我的日常 Emacs 使用中非常有用，但是我对所有 Lisp 都很着迷，所以也许有一天我会学习和使用其他的。当我开始研究 Common Lisp、Scheme 或 Clojure 时，学习 Emacs Lisp 会对我有帮助吗？换句话说，这对我来说会像学习一门全新的语言，还是某些概念和范式很常见？我也对比较 Lisp 之间的独特差异感兴趣，当我从一个 Lisp 到另一个 Lisp 时，这将是一个问题。
在如何开始学习 Common Lisp 和 Emacs Lisp？提到会有“浪费”，但没有详细说明，具体到什么程度。
如果你想学习一些较早的 Lisp 基础知识，那么 Emacs Lisp 就可以了。
Emacs Lisp：可以在 Emacs 中使用。包括开发环境。主流 Lisp 的旧方言。缺乏很多概念。有许多编辑器编程的扩展。Common Lisp 和 Emacs Lisp 共享一些直接的遗产（命名、概念、...）。
常见的 Lisp。很多好书值得学习。许多 Lisp 概念（包括 OO 编程）可以通过 Common Lisp 学习。强烈推荐。Common Lisp 内置了最重要的 Lisp 工具，其余部分由库提供。有很多东西可以围绕它学习。
Scheme：70 年代创建的不同 Lisp 方言。与 Emacs Lisp 或 Common Lisp 不直接兼容。许多优秀的书籍和其他教程材料。强烈推荐用于学习 Lisp 基础知识和一些更高级的东西。对 Scheme 的研究越深入，它看起来与 Emacs Lisp 甚至 Common Lisp 的区别就越大。
Clojure：非常不同的 Lisp 方言。与 Common Lisp、Emacs Lisp 或 Scheme 不兼容。共享一些概念，一些概念的工作方式不同。好书。如果您想学习一些 Lisp 或特别是 Clojure，建议您使用。Clojure 强调函数式和并发编程——非常相关的主题。
如果你想学习更多主流的 Lisp（一种具有典型 Lisp 方言外观和感觉的 Lisp），我会推荐 Common Lisp 或 Scheme。
我对学习 Lisp (!) 的语言偏好是：
给你举个例子：
这是McCarthy 的 LispCOLLAPSE中的函数，写于 1960 年（来自Lisp I Programmer's manual，1960，第 101 页）。它基本上是许多 Lisp 练习中的功能。它接受一个嵌套列表并返回一个新列表，其中包含单个列表中的原子。FLATTEN
DEFINE
(((COLLAPSE,(LAMBDA,(L),(COND,
((ATOM,L),(CONS,L,NIL))
((NULL,(CDR,L)),
(COND,((ATOM,(CAR,L)),L),(T,(COLLAPSE,(CAR,L)))))
(T,(APPEND,(COLLAPSE,(CAR,L)),(COLLAPSE,(CDR,L)))))
))))))
这是Common Lisp版本。您可以将其保留为大写或将其转换为小写。两者都有效。
(DEFUN COLLAPSE (L)
(COND
((ATOM L) (CONS L NIL))
((NULL (CDR L))
(COND ((ATOM (CAR L)) L)
(T (COLLAPSE (CAR L)))))
(T (APPEND (COLLAPSE (CAR L))
(COLLAPSE (CDR L))))))
基本上是一样的。只有定义函数的形式有不同的名称和语法。否则代码完全相同。
在Common Lisp中尝试 McCarthy 的示例：
CL-USER > (COLLAPSE '(((A B) ((C))) ((D (E F)) (G) ((H)))))
(A B C D E F G H)
它运行。
现在让我们使用 GNU Emacs在Emacs Lisp中尝试一下。Emacs Lisp 有小写的标识符：
ELISP> (defun collapse (l)
(cond
((atom l) (cons l nil))
((null (cdr l))
(cond ((atom (car l)) l)
(t (collapse (car l)))))
(t (append (collapse (car l))
(collapse (cdr l))))))
ELISP> (collapse '(((a b) ((c))) ((d (e f)) (g) ((h)))))
(a b c d e f g h)
它无需更改即可在Emacs Lisp中运行。
您可以在Scheme中获得类似的版本（少量重命名）：。
在Petite Chez 计划中：
> (define collapse
(lambda (l)
(cond
((atom? l) (cons l '()))
((null? (cdr l))
(cond ((atom? (car l)) l)
(else (collapse (car l)))))
(else (append (collapse (car l))
(collapse (cdr l)))))))
我们可以用它DEFINE来定义一个函数。COND看起来略有不同。()是空列表。谓词有一个?添加。
> (collapse '(((a b) ((c))) ((d (e f)) (g) ((h)))))
(a b c d e f g h)
运行。
在 Clojure 中，它看起来会有所不同。基本上你必须重新考虑很多代码。
这是 Clojure 自己的实现flatten：
(defn flatten
[x]
(filter (complement sequential?)
(rest (tree-seq sequential? seq x))))
您可以flatten按照 Lisp 版本的精神编写一个 - 它看起来仍然会有所不同。
来自rosetta.org：
(defn flatten [coll]
(lazy-seq
(when-let [s (seq coll)]
(if (coll? (first s))
(concat (flatten (first s)) (flatten (rest s)))
(cons (first s) (flatten (rest s)))))))
名称不同，语法不同，语义不同（适用于惰性序列而不是列表）。
Common Lisp、Emacs Lisp、Visual Lisp、ISLISP 等方言试图保留传统。
像 Scheme 或 Clojure 这样的方言感觉不受名称和语法的约束。他们在各个方向进行了创新。Scheme 仍然提供旧功能的直接版本。Clojure 没有。Clojure 程序员不会将此视为劣势。
是的 - 如果你已经知道一个新的 Lisp，那么选择一个新的 Lisp 会容易得多。
原因：