xemacs-beta: src/editfns.c comparison

comparison src/editfns.c @ 4693:80cd90837ac5

Add argument information to remaining MANY or UNEVALLED C subrs. src/ChangeLog addition: 2009-09-20 Aidan Kehoe <kehoea@parhasard.net> * alloc.c (Flist): (Fvector): (Fbit_vector): (Fmake_byte_code): (Fstring): * data.c (Feqlsign): (Flss): (Fgtr): (Fleq): (Fgeq): (Fneq): (Fgtr): (Fplus): (Fminus): (Ftimes): (Fdiv): (Fquo): (Fmax): (Fmin): (Flogand): (Flogior): (Flogxor): * editfns.c (Fsave_excursion): (Fsave_current_buffer): (Fencode_time): (Finsert): (Finsert_before_markers): (Fsave_restriction): (Fformat): * elhash.c (Fmake_hash_table): * eval.c (Fdefun): (Fdefmacro): (Fcatch): (Funwind_protect): (Fcall_with_condition_handler): (Ffuncall): (Fapply): (Frun_hooks): * fns.c (Fappend): (Fconcat): (Fvconcat): (Fbvconcat): (Fnconc): * print.c (Fwith_output_to_temp_buffer): * process.c (Fstart_process_internal): * window.c (Fsave_window_excursion): * widget.c (Fwidget_apply): Add argument information, in a form understood by #'function-arglist, to all these MANY or UNEVALLED (that is to say, special-operator) built-in functions.

author	Aidan Kehoe <kehoea@parhasard.net>
date	Sun, 20 Sep 2009 21:29:00 +0100
parents	c76b1bc6bd28
children	a5210e70ffbe

comparison

equal deleted inserted replaced

-:dc3c2f298857
+:80cd90837ac5
 DEFUN ("save-excursion", Fsave_excursion, 0, UNEVALLED, 0, /*
 Save point, mark, and current buffer; execute BODY; restore those things.
 Executes BODY just like `progn'.
 The values of point, mark and the current buffer are restored
 even in case of abnormal exit (throw or error).
+arguments: (&rest BODY)
 */
 (args))
 {
 /* This function can GC */
 int speccount = specpdl_depth ();
 }
 DEFUN ("save-current-buffer", Fsave_current_buffer, 0, UNEVALLED, 0, /*
 Save the current buffer; execute BODY; restore the current buffer.
 Executes BODY just like `progn'.
+arguments: (&rest BODY)
 */
 (args))
 {
 /* This function can GC */
 int speccount = specpdl_depth ();
 return list2 (make_int (tiempo < 0 ? tiempo / 0x10000 : tiempo >> 16),
 		make_int (tiempo & 0xFFFF));
 }
 DEFUN ("encode-time", Fencode_time, 6, MANY, 0, /*
 Convert SECOND, MINUTE, HOUR, DAY, MONTH, YEAR and ZONE to internal time.
 This is the reverse operation of `decode-time', which see.
 ZONE defaults to the current time zone rule.  This can
 be a string (as from `set-time-zone-rule'), or it can be a list
 \(as from `current-time-zone') or an integer (as from `decode-time')
 applied without consideration for daylight savings time.
 Out-of-range values for SEC, MINUTE, HOUR, DAY, or MONTH are allowed;
 for example, a DAY of 0 means the day preceding the given month.
 Year numbers less than 100 are treated just like other year numbers.
 If you want them to stand for years in this century, you must do that yourself.
+arguments: (SECOND MINUTE HOUR DAY MONTH YEAR &optional ZONE &rest REST)
 */
 (int nargs, Lisp_Object *args))
 {
 time_t the_time;
 struct tm tm;
 argument "array", since the only element of the array will
 not be used after calling insert_emacs_char or insert_lisp_string,
 so we don't care if it gets trashed.  */
 DEFUN ("insert", Finsert, 0, MANY, 0, /*
-Insert the arguments, either strings or characters, at point.
+Insert ARGS, either strings or characters, at point.
 Point moves forward so that it ends up after the inserted text.
 Any other markers at the point of insertion remain before the text.
 If a string has non-null string-extent-data, new extents will be created.
+arguments: (&rest ARGS)
 */
 (int nargs, Lisp_Object *args))
 {
 /* This function can GC */
 REGISTER int argnum;
 DEFUN ("insert-before-markers", Finsert_before_markers, 0, MANY, 0, /*
 Insert strings or characters at point, relocating markers after the text.
 Point moves forward so that it ends up after the inserted text.
 Any other markers at the point of insertion also end up after the text.
+arguments: (&rest ARGS)
 */
 (int nargs, Lisp_Object *args))
 {
 /* This function can GC */
 REGISTER int argnum;
 widened and then made changes outside the old restricted area.)
 Note: if you are using both `save-excursion' and `save-restriction',
 use `save-excursion' outermost:
 (save-excursion (save-restriction ...))
+arguments: (&rest BODY)
 */
 (body))
 {
 /* This function can GC */
 int speccount =
 a decimal point is printed in %f, %e, and %E conversions even if no
 numbers are printed after it; and trailing zeroes are not omitted in
 %g and %G conversions.
 Use %% to put a single % into the output.
+arguments: (CONTROL-STRING &rest ARGS)
 */
 (int nargs, Lisp_Object *args))
 {
 /* It should not be necessary to GCPRO ARGS, because
 the caller in the interpreter should take care of that.  */

Mercurial > hg > xemacs-beta

comparison src/editfns.c @ 4693:80cd90837ac5