comparison src/md5.c @ 382:064ab7fed2e0 r21-2-6

Import from CVS: tag r21-2-6
author cvs
date Mon, 13 Aug 2007 11:07:39 +0200
parents 8626e4521993
children 74fd4e045ea6
comparison
equal deleted inserted replaced
381:908a86f940e6 382:064ab7fed2e0
561 { 561 {
562 Bytecount bstart, bend; 562 Bytecount bstart, bend;
563 CHECK_STRING (object); 563 CHECK_STRING (object);
564 get_string_range_byte (object, start, end, &bstart, &bend, 564 get_string_range_byte (object, start, end, &bstart, &bend,
565 GB_HISTORICAL_STRING_BEHAVIOR); 565 GB_HISTORICAL_STRING_BEHAVIOR);
566 instream = make_lisp_string_input_stream (object, bstart, bend); 566 instream = make_lisp_string_input_stream (object, bstart, bend - bstart);
567 } 567 }
568 GCPRO1 (instream); 568 GCPRO1 (instream);
569 569
570 #ifdef FILE_CODING 570 #ifdef FILE_CODING
571 /* Determine the coding and set up the conversion stream. */ 571 /* Determine the coding and set up the conversion stream. */