- android - 多次调用 OnPrimaryClipChangedListener
- android - 无法更新 RecyclerView 中的 TextView 字段
- android.database.CursorIndexOutOfBoundsException : Index 0 requested, 光标大小为 0
- android - 使用 AppCompat 时,我们是否需要明确指定其 UI 组件(Spinner、EditText)颜色
我正在尝试使用宏生成函数:
(defmacro make-my-emacs-command-region (cmd name)
(list 'defun (intern (format "my-emacs-command-%s-%s" cmd name))
'(&optional arg)
(list 'interactive "p")
(list (intern (format "mark-%s" name)) 'arg)
(list (intern (format "my-emacs-command-%s-region" cmd))
'(region-beginning) '(region-end))))
生成器:
(mapcar (lambda (a) (make-my-emacs-command-region a buffer))
'(foo bar))
但是我得到:
my-emacs-command-a-buffer
我做错了什么?如何强制传递 a
的值?
最佳答案
lisp 宏的一个要点是参数不 求值。阅读 macro pages in the manual ,特别是 expansion of macros . macroexpand
函数可用于调试问题。另外,backquote可能会帮助您更简洁地编写宏的主体。
关于emacs - elisp mapcar + lambda + defmacro 帮助,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/4982559/
我注意到我的代码中有一种趋势,就是一遍又一遍地重复相同的 (with-current-buffer .... 所以我决定根据宏定义来定义一个宏with-current-buffer - 这是我目前所拥
我正在尝试使用 defmacro在 ClojureScript 中,但出现控制台错误: TypeError: 'undefined' is not an object (evaluating 'crd
我在 Clojure 中遇到了一个与 defmacro 相关的奇怪问题,我有这样的代码 (defmacro ttt ([] (ttt 1)) ([a] (ttt a 2)) ([a b]
我有一个简单的宏: (defmacro macrotest [coll] `(let [result# ~(reduce + coll)] result#)) 为什么,如果此代码
我正在尝试创建一个小的 Clojure 宏 def s 带有类型提示的字符串: (defmacro def-string [name value] `(def ^String ~name ~val
我编写了一个宏,它接受要调用的 lambda 列表并生成一个函数。 lambda 始终在 defun 参数列表中计算,但不在 defmacro 中计算。如何避免在 defmacro 中调用 eval?
我写了两个这样的函数,但是正如你所看到的,它们的大部分是相同的,所以我想写一个宏来简化它们。 我看懂了教科书上的简单宏示例,但我不知道如何编写自己的示例。 这是我的代码: (defn load-di
在 sbcl 中,我知道在 defun 中同时使用 &optional 和 &key 时我可以消除预期的消息,但这在 defmacro 中似乎不起作用。 (我应该重新设计/重写,我知道,但这是遗留代码
这将返回 false。 (defmacro scratch [pattern] `(= 'b (first ~pattern))) (scratch '(b)) 然而,下面的输出是b。 (defm
宏指示它传递了无效参数的传统的、行为良好的方式是什么? (defmacro defthisthing [name & definitions] . . .) 我现在正在写一个宏来接受一大堆定义。如果相
关闭。此题需要details or clarity 。目前不接受答案。 想要改进这个问题吗?通过 editing this post 添加详细信息并澄清问题. 已关闭 9 年前。 Improve th
我在 Clojure 中遇到了一个与 defmacro 有关的奇怪问题,我有类似的代码 (defmacro ttt ([] (ttt 1)) ([a] (ttt a 2)) ([a b]
我想出了下面的函数,它按预期工作,但它使用了 eval,这很糟糕,而且在我打算使用它的 ClojureScript 中不存在。 (defn path [d p] (eval (concat
我想出了下面的函数,它按预期工作,但它使用了 eval,这很糟糕,而且在我打算使用它的 ClojureScript 中不存在。 (defn path [d p] (eval (concat
我在处理 CL 中的一些嵌套反引号时遇到了一些麻烦。我正在尝试创建一个宏 define-access,它采用两个参数,F 和 A。 define-access 应该为符号 F 定义一个函数和 setf
2013 年 5 月更新:从 GNU Emacs 24.3.1 开始,(let .. (defun..)) 字节编译正常,没有警告,字节编译代码与未编译代码的工作方式相同。只是不要忘记将文件变量 le
我写了一个快速而肮脏的宏来为 lisp 代码计时。但是,我现在面临的问题是我想在函数中包含一个可选的输出流。但是,我不知道如何在 defmacro 中同时使用 &optional 和 &body 参数
我有一个 Common Lisp 类(class): (defclass my-cool-class() ((variable1 :initarg :variable1 :acce
在查看 defmacro 之后的 clojure.core 文件时定义你来到下面的代码: (. (var defmacro) (setMacro)) 这是什么意思? 最佳答案 .的含义正如 Joost
我一直在查看 defmacro 的源代码,它在定义中使用“let”: (def ^{:doc "Like defn, but the resulting function name is decla
我是一名优秀的程序员,十分优秀!