Mercurial > emacs
comparison src/eval.c @ 46198:9b8d032820a2
(Fdefmacro): Doc fix.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sun, 07 Jul 2002 10:07:32 +0000 |
parents | f1be57638503 |
children | 1fb8f75062c6 |
comparison
equal
deleted
inserted
replaced
46197:7384ea4d758d | 46198:9b8d032820a2 |
---|---|
644 return fn_name; | 644 return fn_name; |
645 } | 645 } |
646 | 646 |
647 DEFUN ("defmacro", Fdefmacro, Sdefmacro, 2, UNEVALLED, 0, | 647 DEFUN ("defmacro", Fdefmacro, Sdefmacro, 2, UNEVALLED, 0, |
648 doc: /* Define NAME as a macro. | 648 doc: /* Define NAME as a macro. |
649 The definition is (macro lambda ARGLIST [DOCSTRING] BODY...). | 649 The actual definition looks like |
650 (macro lambda ARGLIST [DOCSTRING] [DECL] BODY...). | |
650 When the macro is called, as in (NAME ARGS...), | 651 When the macro is called, as in (NAME ARGS...), |
651 the function (lambda ARGLIST BODY...) is applied to | 652 the function (lambda ARGLIST BODY...) is applied to |
652 the list ARGS... as it appears in the expression, | 653 the list ARGS... as it appears in the expression, |
653 and the result should be a form to be evaluated instead of the original. | 654 and the result should be a form to be evaluated instead of the original. |
654 usage: (defmacro NAME ARGLIST [DOCSTRING] BODY...) */) | 655 |
656 DECL is a declaration, optional, which can specify how to indent | |
657 calls to this macro and how Edebug should handle it. It looks like this: | |
658 (declare SPECS...) | |
659 The elements can look like this: | |
660 (indent INDENT) | |
661 Set NAME's `lisp-indent-function' property to INDENT. | |
662 | |
663 (edebug DEBUG) | |
664 Set NAME's `edebug-form-spec' property to DEBUG. (This is | |
665 equivalent to writing a `def-edebug-spec' for the macro. | |
666 usage: (defmacro NAME ARGLIST [DOCSTRING] [DECL] BODY...) */) | |
655 (args) | 667 (args) |
656 Lisp_Object args; | 668 Lisp_Object args; |
657 { | 669 { |
658 register Lisp_Object fn_name; | 670 register Lisp_Object fn_name; |
659 register Lisp_Object defn; | 671 register Lisp_Object defn; |