diff options
| author | Lars Ingebrigtsen | 2016-02-22 15:18:41 +1100 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2016-02-22 15:18:41 +1100 |
| commit | f50074922e2f68c66f3db848495bc5f13f32ae22 (patch) | |
| tree | 12947f1b57d44686fe75fdf5922351674e675088 /src/process.c | |
| parent | f577f59a5216bc7708bb840f5eac3e82950e81e8 (diff) | |
| download | emacs-f50074922e2f68c66f3db848495bc5f13f32ae22.tar.gz emacs-f50074922e2f68c66f3db848495bc5f13f32ae22.zip | |
Clean up debugging code
* src/process.c (Fmake_network_process): Remove debugging printf.
(wait_for_socket_fds, wait_while_connecting)
(wait_for_tls_negotiation): Remove newlines from messages.
Diffstat (limited to 'src/process.c')
| -rw-r--r-- | src/process.c | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/src/process.c b/src/process.c index c881a20790e..7679f69b989 100644 --- a/src/process.c +++ b/src/process.c | |||
| @@ -3787,7 +3787,6 @@ usage: (make-network-process &rest ARGS) */) | |||
| 3787 | { | 3787 | { |
| 3788 | int ret; | 3788 | int ret; |
| 3789 | 3789 | ||
| 3790 | printf("Async DNS for '%s'\n", SSDATA (host)); | ||
| 3791 | dns_requests = xmalloc (sizeof (struct gaicb*)); | 3790 | dns_requests = xmalloc (sizeof (struct gaicb*)); |
| 3792 | dns_requests[0] = xmalloc (sizeof (struct gaicb)); | 3791 | dns_requests[0] = xmalloc (sizeof (struct gaicb)); |
| 3793 | dns_requests[0]->ar_name = strdup (SSDATA (host)); | 3792 | dns_requests[0]->ar_name = strdup (SSDATA (host)); |
| @@ -4743,7 +4742,7 @@ wait_for_socket_fds (Lisp_Object process, char *name) | |||
| 4743 | while (XPROCESS (process)->infd < 0 && | 4742 | while (XPROCESS (process)->infd < 0 && |
| 4744 | EQ (XPROCESS (process)->status, Qconnect)) | 4743 | EQ (XPROCESS (process)->status, Qconnect)) |
| 4745 | { | 4744 | { |
| 4746 | add_to_log ("Waiting for socket from %s...\n", build_string (name)); | 4745 | add_to_log ("Waiting for socket from %s...", build_string (name)); |
| 4747 | wait_reading_process_output (0, 20 * 1000 * 1000, 0, 0, Qnil, NULL, 0); | 4746 | wait_reading_process_output (0, 20 * 1000 * 1000, 0, 0, Qnil, NULL, 0); |
| 4748 | } | 4747 | } |
| 4749 | } | 4748 | } |
| @@ -4753,7 +4752,7 @@ wait_while_connecting (Lisp_Object process) | |||
| 4753 | { | 4752 | { |
| 4754 | while (EQ (XPROCESS (process)->status, Qconnect)) | 4753 | while (EQ (XPROCESS (process)->status, Qconnect)) |
| 4755 | { | 4754 | { |
| 4756 | add_to_log ("Waiting for connection...\n"); | 4755 | add_to_log ("Waiting for connection..."); |
| 4757 | wait_reading_process_output (0, 20 * 1000 * 1000, 0, 0, Qnil, NULL, 0); | 4756 | wait_reading_process_output (0, 20 * 1000 * 1000, 0, 0, Qnil, NULL, 0); |
| 4758 | } | 4757 | } |
| 4759 | } | 4758 | } |
| @@ -4765,7 +4764,7 @@ wait_for_tls_negotiation (Lisp_Object process) | |||
| 4765 | while (XPROCESS (process)->gnutls_p && | 4764 | while (XPROCESS (process)->gnutls_p && |
| 4766 | XPROCESS (process)->gnutls_initstage != GNUTLS_STAGE_READY) | 4765 | XPROCESS (process)->gnutls_initstage != GNUTLS_STAGE_READY) |
| 4767 | { | 4766 | { |
| 4768 | add_to_log ("Waiting for TLS...\n"); | 4767 | add_to_log ("Waiting for TLS..."); |
| 4769 | wait_reading_process_output (0, 20 * 1000 * 1000, 0, 0, Qnil, NULL, 0); | 4768 | wait_reading_process_output (0, 20 * 1000 * 1000, 0, 0, Qnil, NULL, 0); |
| 4770 | } | 4769 | } |
| 4771 | #endif | 4770 | #endif |