Mercurial > emacs
comparison src/process.c @ 16718:ea26040865cb
(send_process) [EMACS_HAS_USECS]:
When we wait for the buffer to clear, wait just .02 second.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Wed, 18 Dec 1996 16:37:52 +0000 |
| parents | 3a93437adce1 |
| children | 309a750fd5c0 |
comparison
equal
deleted
inserted
replaced
| 16717:18d451689307 | 16718:ea26040865cb |
|---|---|
| 2779 (unsigned char *) buf); | 2779 (unsigned char *) buf); |
| 2780 else if (STRINGP (object)) | 2780 else if (STRINGP (object)) |
| 2781 offset = buf - (char *) XSTRING (object)->data; | 2781 offset = buf - (char *) XSTRING (object)->data; |
| 2782 | 2782 |
| 2783 XSETFASTINT (zero, 0); | 2783 XSETFASTINT (zero, 0); |
| 2784 #ifdef EMACS_HAS_USECS | |
| 2785 wait_reading_process_input (0, 20000, zero, 0); | |
| 2786 #else | |
| 2784 wait_reading_process_input (1, 0, zero, 0); | 2787 wait_reading_process_input (1, 0, zero, 0); |
| 2788 #endif | |
| 2785 | 2789 |
| 2786 if (BUFFERP (object)) | 2790 if (BUFFERP (object)) |
| 2787 buf = (char *) BUF_CHAR_ADDRESS (XBUFFER (object), offset); | 2791 buf = (char *) BUF_CHAR_ADDRESS (XBUFFER (object), offset); |
| 2788 else if (STRINGP (object)) | 2792 else if (STRINGP (object)) |
| 2789 buf = offset + (char *) XSTRING (object)->data; | 2793 buf = offset + (char *) XSTRING (object)->data; |