# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 1054816306 0
# Node ID 108e326323e3e6087d78070b39ca82f0cfbeab12
# Parent  57ba655366c4ec6d461fe96b5e0e43d75db35902
(Fcall_process): Handle carryover correctly.

diff -r 57ba655366c4 -r 108e326323e3 src/callproc.c
--- a/src/callproc.c	Thu Jun 05 07:17:10 2003 +0000
+++ b/src/callproc.c	Thu Jun 05 12:31:46 2003 +0000
@@ -797,13 +797,12 @@
 		
 		TEMP_SET_PT_BOTH (PT + process_coding.produced_char,
 				  PT_BYTE + process_coding.produced);
-		nread -= process_coding.consumed;
-		carryover = nread;
+		carryover = process_coding.carryover_bytes;
 		if (carryover > 0)
 		  /* As CARRYOVER should not be that large, we had
 		     better avoid overhead of bcopy.  */
-		  BCOPY_SHORT (bufptr + process_coding.consumed, bufptr,
-			       carryover);
+		  BCOPY_SHORT (process_coding.carryover, bufptr,
+			       process_coding.carryover_bytes);
 	      }
 	  }