aboutsummaryrefslogtreecommitdiffstats
path: root/src/process.c
diff options
context:
space:
mode:
authorPaul Eggert2011-11-28 00:20:58 -0800
committerPaul Eggert2011-11-28 00:20:58 -0800
commitdbf312256d8a8c731dadaf27c1260832a3796350 (patch)
treee24d4b7c814d5f292c779b192371cb7475b0eef6 /src/process.c
parente95def75e4a3fae3f5671cc828012388f0e251f5 (diff)
downloademacs-dbf312256d8a8c731dadaf27c1260832a3796350.tar.gz
emacs-dbf312256d8a8c731dadaf27c1260832a3796350.zip
Remove GCPRO-related macros that exist only to avoid shadowing locals.
* lisp.h (GCPRO1_VAR, GCPRO2_VAR, GCPRO3_VAR, GCPRO4_VAR, GCPRO5_VAR) (GCPRO6_VAR, UNGCPRO_VAR): Remove. See <http://lists.gnu.org/archive/html/emacs-diffs/2011-11/msg00265.html>. All uses changed to use GCPRO1 etc. (GCPRO1, GCPRO2, GCPRO3, GCPRO4, GCPRO5, GCPRO6, UNGCPRO): Revert to old implementation (i.e., before 2011-03-11).
Diffstat (limited to 'src/process.c')
-rw-r--r--src/process.c10
1 files changed, 5 insertions, 5 deletions
diff --git a/src/process.c b/src/process.c
index ba3eeb81614..05c4be27550 100644
--- a/src/process.c
+++ b/src/process.c
@@ -3474,7 +3474,7 @@ usage: (make-network-process &rest ARGS) */)
3474 3474
3475 { 3475 {
3476 /* Setup coding systems for communicating with the network stream. */ 3476 /* Setup coding systems for communicating with the network stream. */
3477 struct gcpro inner_gcpro1; 3477 struct gcpro gcpro1;
3478 /* Qt denotes we have not yet called Ffind_operation_coding_system. */ 3478 /* Qt denotes we have not yet called Ffind_operation_coding_system. */
3479 Lisp_Object coding_systems = Qt; 3479 Lisp_Object coding_systems = Qt;
3480 Lisp_Object fargs[5], val; 3480 Lisp_Object fargs[5], val;
@@ -3502,9 +3502,9 @@ usage: (make-network-process &rest ARGS) */)
3502 { 3502 {
3503 fargs[0] = Qopen_network_stream, fargs[1] = name, 3503 fargs[0] = Qopen_network_stream, fargs[1] = name,
3504 fargs[2] = buffer, fargs[3] = host, fargs[4] = service; 3504 fargs[2] = buffer, fargs[3] = host, fargs[4] = service;
3505 GCPRO1_VAR (proc, inner_gcpro); 3505 GCPRO1 (proc);
3506 coding_systems = Ffind_operation_coding_system (5, fargs); 3506 coding_systems = Ffind_operation_coding_system (5, fargs);
3507 UNGCPRO_VAR (inner_gcpro); 3507 UNGCPRO;
3508 } 3508 }
3509 if (CONSP (coding_systems)) 3509 if (CONSP (coding_systems))
3510 val = XCAR (coding_systems); 3510 val = XCAR (coding_systems);
@@ -3535,9 +3535,9 @@ usage: (make-network-process &rest ARGS) */)
3535 { 3535 {
3536 fargs[0] = Qopen_network_stream, fargs[1] = name, 3536 fargs[0] = Qopen_network_stream, fargs[1] = name,
3537 fargs[2] = buffer, fargs[3] = host, fargs[4] = service; 3537 fargs[2] = buffer, fargs[3] = host, fargs[4] = service;
3538 GCPRO1_VAR (proc, inner_gcpro); 3538 GCPRO1 (proc);
3539 coding_systems = Ffind_operation_coding_system (5, fargs); 3539 coding_systems = Ffind_operation_coding_system (5, fargs);
3540 UNGCPRO_VAR (inner_gcpro); 3540 UNGCPRO;
3541 } 3541 }
3542 } 3542 }
3543 if (CONSP (coding_systems)) 3543 if (CONSP (coding_systems))