# HG changeset patch
# User Andreas Schwab <schwab@suse.de>
# Date 892559138 0
# Node ID be8599b6636a6bcf7607ee7f52e6e544fec47b19
# Parent  8c50610fbb999ababc867a31dd42dd3b18c0e1cd
(read_process_output): Fix mixing of Lisp_Object and
int.

diff -r 8c50610fbb99 -r be8599b6636a src/process.c
--- a/src/process.c	Tue Apr 14 13:03:30 1998 +0000
+++ b/src/process.c	Tue Apr 14 13:05:38 1998 +0000
@@ -2828,11 +2828,11 @@
 	     valid memory because p->outfd will be changed once EOF is
 	     sent to the process.  */
 	  if (NILP (p->encode_coding_system)
-	      && proc_encode_coding_system[p->outfd])
+	      && proc_encode_coding_system[XINT (p->outfd)])
 	    {
 	      p->encode_coding_system = coding->symbol;
 	      setup_coding_system (coding->symbol,
-				   proc_encode_coding_system[p->outfd]);
+				   proc_encode_coding_system[XINT (p->outfd)]);
 	    }
 	}