summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPaul Eggert <eggert@cs.ucla.edu>2011-11-25 23:42:44 -0800
committerPaul Eggert <eggert@cs.ucla.edu>2011-11-25 23:42:44 -0800
commit5b76caa476d552e204adc3c1bf4af8e401ec5d42 (patch)
treef1ea7b28bd616eb17f6714af16a81429800479a5
parent78adbf9c3f71e4387d4b01697b76999c883735c4 (diff)
downloademacs-5b76caa476d552e204adc3c1bf4af8e401ec5d42.tar.gz
Rename locals to avoid shadowing.
* fileio.c (Finsert_file_contents): Rename inner 'gcpro1' to 'inner_gcpro1' to avoid shadowing. * process.c (wait_reading_process_output): Rename inner 'proc' to 'p' to avoid shadowing. Indent for consistency with usual Emacs style.
-rw-r--r--src/ChangeLog9
-rw-r--r--src/fileio.c4
-rw-r--r--src/process.c31
3 files changed, 28 insertions, 16 deletions
diff --git a/src/ChangeLog b/src/ChangeLog
index 6d1a645c3ee..9097eab47a2 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,12 @@
+2011-11-26 Paul Eggert <eggert@cs.ucla.edu>
+
+ Rename locals to avoid shadowing.
+ * fileio.c (Finsert_file_contents):
+ Rename inner 'gcpro1' to 'inner_gcpro1' to avoid shadowing.
+ * process.c (wait_reading_process_output):
+ Rename inner 'proc' to 'p' to avoid shadowing.
+ Indent for consistency with usual Emacs style.
+
2011-11-25 Eli Zaretskii <eliz@gnu.org>
* xdisp.c (redisplay_window): If cursor row is not fully visible
diff --git a/src/fileio.c b/src/fileio.c
index 5f7a8ad3972..009f35d2a7f 100644
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -3686,7 +3686,7 @@ variable `last-coding-system-used' to the coding system actually used. */)
int this_count = SPECPDL_INDEX ();
int multibyte = ! NILP (BVAR (current_buffer, enable_multibyte_characters));
Lisp_Object conversion_buffer;
- struct gcpro gcpro1;
+ struct gcpro inner_gcpro1;
conversion_buffer = code_conversion_save (1, multibyte);
@@ -3702,7 +3702,7 @@ variable `last-coding-system-used' to the coding system actually used. */)
inserted = 0; /* Bytes put into CONVERSION_BUFFER so far. */
unprocessed = 0; /* Bytes not processed in previous loop. */
- GCPRO1 (conversion_buffer);
+ GCPRO1_VAR (conversion_buffer, inner_gcpro);
while (how_much < total)
{
/* We read one bunch by one (READ_BUF_SIZE bytes) to allow
diff --git a/src/process.c b/src/process.c
index 892bd9820bf..ba3eeb81614 100644
--- a/src/process.c
+++ b/src/process.c
@@ -4630,26 +4630,29 @@ wait_reading_process_output (int time_limit, int microsecs, int read_kbd,
the gnutls library -- 2.12.14 has been confirmed
to need it. See
http://comments.gmane.org/gmane.emacs.devel/145074 */
- struct Lisp_Process *proc;
for (channel = 0; channel < MAXDESC; ++channel)
- {
- if (! NILP (chan_process[channel]) &&
- (proc = XPROCESS (chan_process[channel])) != NULL &&
- proc->gnutls_p &&
- proc->infd &&
- emacs_gnutls_record_check_pending (proc->gnutls_state) > 0)
- {
- nfds++;
- FD_SET (proc->infd, &Available);
- }
- }
+ if (! NILP (chan_process[channel]))
+ {
+ struct Lisp_Process *p =
+ XPROCESS (chan_process[channel]);
+ if (p && p->gnutls_p && p->infd
+ && ((emacs_gnutls_record_check_pending
+ (p->gnutls_state))
+ > 0))
+ {
+ nfds++;
+ FD_SET (p->infd, &Available);
+ }
+ }
}
else
{
/* Check this specific channel. */
- if (wait_proc->gnutls_p && /* Check for valid process. */
+ if (wait_proc->gnutls_p /* Check for valid process. */
/* Do we have pending data? */
- emacs_gnutls_record_check_pending (wait_proc->gnutls_state) > 0)
+ && ((emacs_gnutls_record_check_pending
+ (wait_proc->gnutls_state))
+ > 0))
{
nfds = 1;
/* Set to Available. */