初稿: 2018-08-09 Thu 10:23
最終更新日: 2018-12-14 Fri 20:44
ホーム | 文書トップ | 目次

org-with-gensyms
シンボル作成のマクロ

1: (defmacro org-with-gensyms (symbols &rest body)
2:   (declare (debug (sexp body)) (indent 1))
3:   `(let ,(mapcar (lambda (s)
4:                    `(,s (make-symbol (concat "--" (symbol-name ',s)))))
5:                  symbols)
6:      ,@body))

日付: 2018-08-09 Thu 10:23

著者: conao

Created: 2018-12-14 Fri 21:04

Validate