Mercurial > emacs
changeset 1234:9ca8c55f9ae5
Dox Fix
| author | Christopher Zaborsky <rogue@erratum.com> |
|---|---|
| date | Sun, 27 Sep 1992 17:30:03 +0000 |
| parents | e795fe80b14e |
| children | a9e3ec19b7d7 |
| files | lisp/emacs-lisp/backquote.el |
| diffstat | 1 files changed, 4 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emacs-lisp/backquote.el Sun Sep 27 17:22:08 1992 +0000 +++ b/lisp/emacs-lisp/backquote.el Sun Sep 27 17:30:03 1992 +0000 @@ -149,7 +149,7 @@ ;;; 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 @@ ;;; 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)