annotate lib-src/leditcfns.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 |
376386a54a3c |
children |
|
rev |
line source |
0
|
1 /* Synched up with: FSF 19.28. */
|
|
2
|
|
3 #include <sgtty.h>
|
|
4 #include <signal.h>
|
|
5 #define STRLEN 100
|
|
6 static char str[STRLEN+1] = "%?emacs"; /* extra char for the null */
|
|
7
|
|
8 switch_to_proc(){
|
|
9 char *ptr = str;
|
|
10 while (*ptr) ioctl(0, TIOCSTI, ptr++);
|
|
11 ioctl(0, TIOCSTI, "\n");
|
|
12 kill(getpid(), SIGTSTP);
|
|
13 }
|
|
14
|
|
15 set_proc_str(ptr) char *ptr; {
|
|
16 if (strlen(ptr) <= STRLEN)
|
|
17 strcpy(str, ptr);
|
|
18 else
|
|
19 printf("string too long for set-proc-str: %s\n", ptr);
|
|
20 }
|