Mercurial > hg > xemacs-beta
comparison src/lisp.h @ 5789:72c5d36ba3b6
Make `define-function' accept docstring, as in GNU Emacs.
2014-01-27 Michael Sperber <mike@xemacs.org>
* symbols.c (Fdefine_function): Allow optional `docstring'
argument, as in GNU Emacs.
* lisp.h (Qfunction_documentation): Add extern declaration.
* doc.c (Fdocumentation_property): Move before its use.
(Fdocumentation): Retrieve documentation from `define-function'
docstring for symbols.
author | Mike Sperber <sperber@deinprogramm.de> |
---|---|
date | Mon, 27 Jan 2014 17:50:57 +0100 |
parents | cd4f5f1f1f4c |
children | a216b3c2b09e |
comparison
equal
deleted
inserted
replaced
5788:6a6c89b53c5d | 5789:72c5d36ba3b6 |
---|---|
4617 Lisp_Object make_directory_hash_table (Lisp_Object); | 4617 Lisp_Object make_directory_hash_table (Lisp_Object); |
4618 | 4618 |
4619 /* Defined in doc.c */ | 4619 /* Defined in doc.c */ |
4620 EXFUN (Fsubstitute_command_keys, 1); | 4620 EXFUN (Fsubstitute_command_keys, 1); |
4621 | 4621 |
4622 extern Lisp_Object Qfunction_documentation; | |
4623 | |
4622 Lisp_Object unparesseuxify_doc_string (int fd, EMACS_INT position, | 4624 Lisp_Object unparesseuxify_doc_string (int fd, EMACS_INT position, |
4623 Ibyte *name_nonreloc, | 4625 Ibyte *name_nonreloc, |
4624 Lisp_Object name_reloc, | 4626 Lisp_Object name_reloc, |
4625 int standard_doc_file); | 4627 int standard_doc_file); |
4626 Lisp_Object read_doc_string (Lisp_Object); | 4628 Lisp_Object read_doc_string (Lisp_Object); |