Mercurial > emacs
comparison src/fileio.c @ 28561:98330e399518
(a_write): Remove redundant semi-colons.
(e_write): Return -1 if failed to write all the data.
This fixes the changes made at 1999-12-15.
author | Eli Zaretskii <eliz@gnu.org> |
---|---|
date | Thu, 13 Apr 2000 10:16:18 +0000 |
parents | b6f06a755c7d |
children | 55c84ae4d634 |
comparison
equal
deleted
inserted
replaced
28560:fb9c1497b601 | 28561:98330e399518 |
---|---|
4923 return e_write (desc, string, pos, lastpos, coding); | 4923 return e_write (desc, string, pos, lastpos, coding); |
4924 | 4924 |
4925 /* Output buffer text up to the next annotation's position. */ | 4925 /* Output buffer text up to the next annotation's position. */ |
4926 if (nextpos > pos) | 4926 if (nextpos > pos) |
4927 { | 4927 { |
4928 if (0 > e_write (desc, string, pos, nextpos, coding)); | 4928 if (0 > e_write (desc, string, pos, nextpos, coding)) |
4929 return -1; | 4929 return -1; |
4930 pos = nextpos; | 4930 pos = nextpos; |
4931 } | 4931 } |
4932 /* Output the annotation. */ | 4932 /* Output the annotation. */ |
4933 tem = Fcdr (Fcar (*annot)); | 4933 tem = Fcdr (Fcar (*annot)); |
4934 if (STRINGP (tem)) | 4934 if (STRINGP (tem)) |
4935 { | 4935 { |
4936 if (0 > e_write (desc, tem, 0, XSTRING (tem)->size, coding)); | 4936 if (0 > e_write (desc, tem, 0, XSTRING (tem)->size, coding)) |
4937 return -1; | 4937 return -1; |
4938 } | 4938 } |
4939 *annot = Fcdr (*annot); | 4939 *annot = Fcdr (*annot); |
4940 } | 4940 } |
4941 return 0; | 4941 return 0; |
5018 break; | 5018 break; |
5019 start += coding->consumed_char; | 5019 start += coding->consumed_char; |
5020 if (coding->cmp_data) | 5020 if (coding->cmp_data) |
5021 coding_adjust_composition_offset (coding, start); | 5021 coding_adjust_composition_offset (coding, start); |
5022 } | 5022 } |
5023 return 0; | 5023 return return_val; |
5024 } | 5024 } |
5025 | 5025 |
5026 DEFUN ("verify-visited-file-modtime", Fverify_visited_file_modtime, | 5026 DEFUN ("verify-visited-file-modtime", Fverify_visited_file_modtime, |
5027 Sverify_visited_file_modtime, 1, 1, 0, | 5027 Sverify_visited_file_modtime, 1, 1, 0, |
5028 "Return t if last mod time of BUF's visited file matches what BUF records.\n\ | 5028 "Return t if last mod time of BUF's visited file matches what BUF records.\n\ |