summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/backquote.el
diff options
context:
space:
mode:
authorChristopher Zaborsky <rogue@erratum.com>1992-09-27 17:30:03 +0000
committerChristopher Zaborsky <rogue@erratum.com>1992-09-27 17:30:03 +0000
commit7a4ca96525c3dcc89fc9ec303253daa641ed29ed (patch)
treebb2e9e80772f84bf59007acc18d5169318d42dfb /lisp/emacs-lisp/backquote.el
parent802d2a50bab80eb78d23b0004b657f3f49cf5e51 (diff)
downloademacs-7a4ca96525c3dcc89fc9ec303253daa641ed29ed.tar.gz
Dox Fix
Diffstat (limited to 'lisp/emacs-lisp/backquote.el')
-rw-r--r--lisp/emacs-lisp/backquote.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/emacs-lisp/backquote.el b/lisp/emacs-lisp/backquote.el
index 58cc760e338..c08ea44ee59 100644
--- a/lisp/emacs-lisp/backquote.el
+++ b/lisp/emacs-lisp/backquote.el
@@ -149,7 +149,7 @@ will result in errors that will show up very late."
;;; glue what I've already done to the end, than to to prepare that
;;; something and go back to put things together.
(defun bq-make-maker (form)
- "Given one argument, a `mostly quoted' object, produces a maker.
+ "Given argument FORM, a `mostly quoted' object, produces a maker.
See backquote.el for details"
(let ((tailmaker (quote nil)) (qc 0) (ec 0) (state nil))
(mapcar 'bq-iterative-list-builder (reverse form))
@@ -195,9 +195,9 @@ See backquote.el for details"
;;; This maintains the invariant that (cons state tailmaker) is the
;;; maker for the elements of the tail we've eaten so far.
(defun bq-iterative-list-builder (form)
- "Called by `bq-make-maker'. Adds a new item form to tailmaker,
-changing state if need be, so tailmaker and state constitute a recipe
-for making the list so far."
+ "Adds a new item form to tailmaker changing state if need be, so tailmaker
+and state constitute a recipe for making the list so far. Called by
+`bq-make-maker'."
(cond ((atom form)
(funcall (bq-cadr (assq state bq-quotefns)) form))
((memq (car form) backquote-unquote)