607 |
|
|
608 |
/* We are unable to use interrupts if FIONREAD is not available, |
/* We are unable to use interrupts if FIONREAD is not available, |
609 |
so flush SIGIO so we won't try. */ |
so flush SIGIO so we won't try. */ |
610 |
#ifndef FIONREAD |
#if !defined (FIONREAD) || defined(HAVE_CARBON) |
611 |
#ifdef SIGIO |
#ifdef SIGIO |
612 |
#undef SIGIO |
#undef SIGIO |
613 |
#endif |
#endif |
1089 |
#endif |
#endif |
1090 |
} |
} |
1091 |
|
|
1092 |
|
/* If we're in single_kboard state for kboard KBOARD, |
1093 |
|
get out of it. */ |
1094 |
|
|
1095 |
|
void |
1096 |
|
not_single_kboard_state (kboard) |
1097 |
|
KBOARD *kboard; |
1098 |
|
{ |
1099 |
|
#ifdef MULTI_KBOARD |
1100 |
|
if (kboard == current_kboard) |
1101 |
|
single_kboard = 0; |
1102 |
|
#endif |
1103 |
|
} |
1104 |
|
|
1105 |
/* Maintain a stack of kboards, so other parts of Emacs |
/* Maintain a stack of kboards, so other parts of Emacs |
1106 |
can switch temporarily to the kboard of a given frame |
can switch temporarily to the kboard of a given frame |
1107 |
and then revert to the previous status. */ |
and then revert to the previous status. */ |
10188 |
stuff_buffered_input (stuffstring) |
stuff_buffered_input (stuffstring) |
10189 |
Lisp_Object stuffstring; |
Lisp_Object stuffstring; |
10190 |
{ |
{ |
10191 |
/* stuff_char works only in BSD, versions 4.2 and up. */ |
#ifdef SIGTSTP /* stuff_char is defined if SIGTSTP. */ |
|
#ifdef BSD_SYSTEM |
|
|
#ifndef BSD4_1 |
|
10192 |
register unsigned char *p; |
register unsigned char *p; |
10193 |
|
|
10194 |
if (STRINGP (stuffstring)) |
if (STRINGP (stuffstring)) |
10204 |
|
|
10205 |
/* Anything we have read ahead, put back for the shell to read. */ |
/* Anything we have read ahead, put back for the shell to read. */ |
10206 |
/* ?? What should this do when we have multiple keyboards?? |
/* ?? What should this do when we have multiple keyboards?? |
10207 |
Should we ignore anything that was typed in at the "wrong" kboard? */ |
Should we ignore anything that was typed in at the "wrong" kboard? |
10208 |
|
|
10209 |
|
rms: we should stuff everything back into the kboard |
10210 |
|
it came from. */ |
10211 |
for (; kbd_fetch_ptr != kbd_store_ptr; kbd_fetch_ptr++) |
for (; kbd_fetch_ptr != kbd_store_ptr; kbd_fetch_ptr++) |
10212 |
{ |
{ |
10213 |
|
|
10220 |
} |
} |
10221 |
|
|
10222 |
input_pending = 0; |
input_pending = 0; |
10223 |
#endif |
#endif /* SIGTSTP */ |
|
#endif /* BSD_SYSTEM and not BSD4_1 */ |
|
10224 |
} |
} |
10225 |
|
|
10226 |
void |
void |