From bd7da68ebfe34ad94e72b8a7947ffb52b2ade4df Mon Sep 17 00:00:00 2001 From: Juan Jose Garcia Ripoll Date: Mon, 9 Feb 2009 21:27:19 +0100 Subject: [PATCH] Using fwrite() to write a string, we miss the right character count --- src/c/file.d | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/c/file.d b/src/c/file.d index 6857f150e..13105d8ac 100644 --- a/src/c/file.d +++ b/src/c/file.d @@ -2735,7 +2735,7 @@ io_file_read_vector(cl_object strm, cl_object data, cl_index start, cl_index end cl_elttype t = ecl_array_elttype(data); if (start >= end) return start; - if (t == aet_b8 || t == aet_i8 || t == aet_bc) { + if (t == aet_b8 || t == aet_i8) { if (strm->stream.byte_size == 8) { void *aux = data->vector.self.bc + start; return strm->stream.ops->read_byte8(strm, aux, end-start); @@ -2757,7 +2757,7 @@ io_file_write_vector(cl_object strm, cl_object data, cl_index start, cl_index en cl_elttype t = ecl_array_elttype(data); if (start >= end) return start; - if (t == aet_b8 || t == aet_i8 || t == aet_bc) { + if (t == aet_b8 || t == aet_i8) { if (strm->stream.byte_size == 8) { void *aux = data->vector.self.fix + start; return strm->stream.ops->write_byte8(strm, aux, end-start);