diff options
| author | Christopher Zaborsky | 1992-09-27 17:30:03 +0000 |
|---|---|---|
| committer | Christopher Zaborsky | 1992-09-27 17:30:03 +0000 |
| commit | fd8bf9033731cbf05d0a80c697eec59a30e93b70 (patch) | |
| tree | 4d62b30ff00e6214d1a9bea84475f19433ec8f53 | |
| parent | c8fa98ccfc86bac03eb119505abd8cbd112f387a (diff) | |
| download | emacs-fd8bf9033731cbf05d0a80c697eec59a30e93b70.tar.gz emacs-fd8bf9033731cbf05d0a80c697eec59a30e93b70.zip | |
Dox Fix
| -rw-r--r-- | lisp/emacs-lisp/backquote.el | 8 |
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." | |||
| 149 | ;;; glue what I've already done to the end, than to to prepare that | 149 | ;;; glue what I've already done to the end, than to to prepare that |
| 150 | ;;; something and go back to put things together. | 150 | ;;; something and go back to put things together. |
| 151 | (defun bq-make-maker (form) | 151 | (defun bq-make-maker (form) |
| 152 | "Given one argument, a `mostly quoted' object, produces a maker. | 152 | "Given argument FORM, a `mostly quoted' object, produces a maker. |
| 153 | See backquote.el for details" | 153 | See backquote.el for details" |
| 154 | (let ((tailmaker (quote nil)) (qc 0) (ec 0) (state nil)) | 154 | (let ((tailmaker (quote nil)) (qc 0) (ec 0) (state nil)) |
| 155 | (mapcar 'bq-iterative-list-builder (reverse form)) | 155 | (mapcar 'bq-iterative-list-builder (reverse form)) |
| @@ -195,9 +195,9 @@ See backquote.el for details" | |||
| 195 | ;;; This maintains the invariant that (cons state tailmaker) is the | 195 | ;;; This maintains the invariant that (cons state tailmaker) is the |
| 196 | ;;; maker for the elements of the tail we've eaten so far. | 196 | ;;; maker for the elements of the tail we've eaten so far. |
| 197 | (defun bq-iterative-list-builder (form) | 197 | (defun bq-iterative-list-builder (form) |
| 198 | "Called by `bq-make-maker'. Adds a new item form to tailmaker, | 198 | "Adds a new item form to tailmaker changing state if need be, so tailmaker |
| 199 | changing state if need be, so tailmaker and state constitute a recipe | 199 | and state constitute a recipe for making the list so far. Called by |
| 200 | for making the list so far." | 200 | `bq-make-maker'." |
| 201 | (cond ((atom form) | 201 | (cond ((atom form) |
| 202 | (funcall (bq-cadr (assq state bq-quotefns)) form)) | 202 | (funcall (bq-cadr (assq state bq-quotefns)) form)) |
| 203 | ((memq (car form) backquote-unquote) | 203 | ((memq (car form) backquote-unquote) |