X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=blobdiff_plain;f=src%2Fmd5.c;h=8e524f68749d93df7003a5fe54ebb49fcf67439c;hp=86fb828e4f9982c511b8ef9d1431ef5bd06d22ee;hb=b5eeb6918c29470b36f8461c402eb0c65cb19bd2;hpb=77dcef404dc78635f6ffa8f71a803d2bc7cc8921 diff --git a/src/md5.c b/src/md5.c index 86fb828..8e524f6 100644 --- a/src/md5.c +++ b/src/md5.c @@ -482,7 +482,7 @@ md5_coding_system (Lisp_Object object, Lisp_Object coding, Lisp_Object istream, { /* Attempt to autodetect the coding of the string. This is VERY hit-and-miss. */ - enum eol_type eol = EOL_AUTODETECT; + eol_type_t eol = EOL_AUTODETECT; coding_system = Fget_coding_system (Qundecided); determine_real_coding_system (XLSTREAM (istream), &coding_system, &eol); @@ -563,7 +563,7 @@ file-coding or Mule support. Otherwise, they are ignored. CHECK_STRING (object); get_string_range_byte (object, start, end, &bstart, &bend, GB_HISTORICAL_STRING_BEHAVIOR); - instream = make_lisp_string_input_stream (object, bstart, bend); + instream = make_lisp_string_input_stream (object, bstart, bend - bstart); } GCPRO1 (instream); @@ -582,8 +582,8 @@ file-coding or Mule support. Otherwise, they are ignored. while (1) { Bufbyte tempbuf[1024]; /* some random amount */ - int size_in_bytes = Lstream_read (XLSTREAM (instream), - tempbuf, sizeof (tempbuf)); + ssize_t size_in_bytes = + Lstream_read (XLSTREAM (instream), tempbuf, sizeof (tempbuf)); if (!size_in_bytes) break;