/[emacs]/emacs/src/coding.c
ViewVC logotype

Diff of /emacs/src/coding.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.228 by pj, Sun Nov 4 17:42:30 2001 UTC revision 1.229 by pj, Fri Nov 9 08:00:44 2001 UTC
# Line 4827  encode_coding (coding, source, destinati Line 4827  encode_coding (coding, source, destinati
4827        && coding->result == CODING_FINISH_INSUFFICIENT_SRC)        && coding->result == CODING_FINISH_INSUFFICIENT_SRC)
4828      {      {
4829        unsigned char *src = source + coding->consumed;        unsigned char *src = source + coding->consumed;
       unsigned char *src_end = src + src_bytes;  
4830        unsigned char *dst = destination + coding->produced;        unsigned char *dst = destination + coding->produced;
4831    
4832        if (coding->type == coding_type_iso2022)        if (coding->type == coding_type_iso2022)
# Line 4838  encode_coding (coding, source, destinati Line 4837  encode_coding (coding, source, destinati
4837          {          {
4838            int len = src_bytes - coding->consumed;            int len = src_bytes - coding->consumed;
4839    
4840            BCOPY_SHORT (source + coding->consumed, dst, len);            BCOPY_SHORT (src, dst, len);
4841            if (coding->src_multibyte)            if (coding->src_multibyte)
4842              len = str_as_unibyte (dst, len);              len = str_as_unibyte (dst, len);
4843            dst += len;            dst += len;
# Line 5394  code_convert_region (from, from_byte, to Line 5393  code_convert_region (from, from_byte, to
5393           new buffer.  */           new buffer.  */
5394        struct buffer *prev = current_buffer;        struct buffer *prev = current_buffer;
5395        Lisp_Object new;        Lisp_Object new;
       int count = specpdl_ptr - specpdl;  
5396    
5397        record_unwind_protect (code_convert_region_unwind, Qnil);        record_unwind_protect (code_convert_region_unwind, Qnil);
5398        /* We should not call any more pre-write/post-read-conversion        /* We should not call any more pre-write/post-read-conversion
# Line 5728  code_convert_region (from, from_byte, to Line 5726  code_convert_region (from, from_byte, to
5726        && ! encodep && ! NILP (coding->post_read_conversion))        && ! encodep && ! NILP (coding->post_read_conversion))
5727      {      {
5728        Lisp_Object val;        Lisp_Object val;
       int count = specpdl_ptr - specpdl;  
5729    
5730        if (from != PT)        if (from != PT)
5731          TEMP_SET_PT_BOTH (from, from_byte);          TEMP_SET_PT_BOTH (from, from_byte);

Legend:
Removed from v.1.228  
changed lines
  Added in v.1.229

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26