aboutsummaryrefslogtreecommitdiffstats
path: root/src/fileio.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/fileio.c')
-rw-r--r--src/fileio.c42
1 files changed, 21 insertions, 21 deletions
diff --git a/src/fileio.c b/src/fileio.c
index 5991a238ffc..6deca0bf1e1 100644
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -766,7 +766,7 @@ filesystem tree, not (expand-file-name ".." dirname). */)
766#endif /* DOS_NT */ 766#endif /* DOS_NT */
767 ptrdiff_t length; 767 ptrdiff_t length;
768 Lisp_Object handler, result, handled_name; 768 Lisp_Object handler, result, handled_name;
769 int multibyte; 769 bool multibyte;
770 Lisp_Object hdir; 770 Lisp_Object hdir;
771 771
772 CHECK_STRING (name); 772 CHECK_STRING (name);
@@ -1566,7 +1566,7 @@ those `/' is discarded. */)
1566 char *target = NULL; 1566 char *target = NULL;
1567 int total = 0; 1567 int total = 0;
1568 int substituted = 0; 1568 int substituted = 0;
1569 int multibyte; 1569 bool multibyte;
1570 char *xnm; 1570 char *xnm;
1571 Lisp_Object handler; 1571 Lisp_Object handler;
1572 1572
@@ -3146,12 +3146,12 @@ decide_coding_unwind (Lisp_Object unwind_data)
3146 set_buffer_internal (XBUFFER (buffer)); 3146 set_buffer_internal (XBUFFER (buffer));
3147 adjust_markers_for_delete (BEG, BEG_BYTE, Z, Z_BYTE); 3147 adjust_markers_for_delete (BEG, BEG_BYTE, Z, Z_BYTE);
3148 adjust_overlays_for_delete (BEG, Z - BEG); 3148 adjust_overlays_for_delete (BEG, Z - BEG);
3149 buffer_set_intervals (current_buffer, NULL); 3149 set_buffer_intervals (current_buffer, NULL);
3150 TEMP_SET_PT_BOTH (BEG, BEG_BYTE); 3150 TEMP_SET_PT_BOTH (BEG, BEG_BYTE);
3151 3151
3152 /* Now we are safe to change the buffer's multibyteness directly. */ 3152 /* Now we are safe to change the buffer's multibyteness directly. */
3153 BSET (current_buffer, enable_multibyte_characters, multibyte); 3153 bset_enable_multibyte_characters (current_buffer, multibyte);
3154 BSET (current_buffer, undo_list, undo_list); 3154 bset_undo_list (current_buffer, undo_list);
3155 3155
3156 return Qnil; 3156 return Qnil;
3157} 3157}
@@ -3487,16 +3487,16 @@ variable `last-coding-system-used' to the coding system actually used. */)
3487 buf = XBUFFER (workbuf); 3487 buf = XBUFFER (workbuf);
3488 3488
3489 delete_all_overlays (buf); 3489 delete_all_overlays (buf);
3490 BSET (buf, directory, BVAR (current_buffer, directory)); 3490 bset_directory (buf, BVAR (current_buffer, directory));
3491 BSET (buf, read_only, Qnil); 3491 bset_read_only (buf, Qnil);
3492 BSET (buf, filename, Qnil); 3492 bset_filename (buf, Qnil);
3493 BSET (buf, undo_list, Qt); 3493 bset_undo_list (buf, Qt);
3494 eassert (buf->overlays_before == NULL); 3494 eassert (buf->overlays_before == NULL);
3495 eassert (buf->overlays_after == NULL); 3495 eassert (buf->overlays_after == NULL);
3496 3496
3497 set_buffer_internal (buf); 3497 set_buffer_internal (buf);
3498 Ferase_buffer (); 3498 Ferase_buffer ();
3499 BSET (buf, enable_multibyte_characters, Qnil); 3499 bset_enable_multibyte_characters (buf, Qnil);
3500 3500
3501 insert_1_both ((char *) read_buf, nread, nread, 0, 0, 0); 3501 insert_1_both ((char *) read_buf, nread, nread, 0, 0, 0);
3502 TEMP_SET_PT_BOTH (BEG, BEG_BYTE); 3502 TEMP_SET_PT_BOTH (BEG, BEG_BYTE);
@@ -4105,8 +4105,8 @@ variable `last-coding-system-used' to the coding system actually used. */)
4105 unwind_data = Fcons (BVAR (current_buffer, enable_multibyte_characters), 4105 unwind_data = Fcons (BVAR (current_buffer, enable_multibyte_characters),
4106 Fcons (BVAR (current_buffer, undo_list), 4106 Fcons (BVAR (current_buffer, undo_list),
4107 Fcurrent_buffer ())); 4107 Fcurrent_buffer ()));
4108 BSET (current_buffer, enable_multibyte_characters, Qnil); 4108 bset_enable_multibyte_characters (current_buffer, Qnil);
4109 BSET (current_buffer, undo_list, Qt); 4109 bset_undo_list (current_buffer, Qt);
4110 record_unwind_protect (decide_coding_unwind, unwind_data); 4110 record_unwind_protect (decide_coding_unwind, unwind_data);
4111 4111
4112 if (inserted > 0 && ! NILP (Vset_auto_coding_function)) 4112 if (inserted > 0 && ! NILP (Vset_auto_coding_function))
@@ -4154,7 +4154,7 @@ variable `last-coding-system-used' to the coding system actually used. */)
4154 && NILP (replace)) 4154 && NILP (replace))
4155 /* Visiting a file with these coding system makes the buffer 4155 /* Visiting a file with these coding system makes the buffer
4156 unibyte. */ 4156 unibyte. */
4157 BSET (current_buffer, enable_multibyte_characters, Qnil); 4157 bset_enable_multibyte_characters (current_buffer, Qnil);
4158 } 4158 }
4159 4159
4160 coding.dst_multibyte = ! NILP (BVAR (current_buffer, enable_multibyte_characters)); 4160 coding.dst_multibyte = ! NILP (BVAR (current_buffer, enable_multibyte_characters));
@@ -4197,13 +4197,13 @@ variable `last-coding-system-used' to the coding system actually used. */)
4197 if (!NILP (visit)) 4197 if (!NILP (visit))
4198 { 4198 {
4199 if (!EQ (BVAR (current_buffer, undo_list), Qt) && !nochange) 4199 if (!EQ (BVAR (current_buffer, undo_list), Qt) && !nochange)
4200 BSET (current_buffer, undo_list, Qnil); 4200 bset_undo_list (current_buffer, Qnil);
4201 4201
4202 if (NILP (handler)) 4202 if (NILP (handler))
4203 { 4203 {
4204 current_buffer->modtime = mtime; 4204 current_buffer->modtime = mtime;
4205 current_buffer->modtime_size = st.st_size; 4205 current_buffer->modtime_size = st.st_size;
4206 BSET (current_buffer, filename, orig_filename); 4206 bset_filename (current_buffer, orig_filename);
4207 } 4207 }
4208 4208
4209 SAVE_MODIFF = MODIFF; 4209 SAVE_MODIFF = MODIFF;
@@ -4248,7 +4248,7 @@ variable `last-coding-system-used' to the coding system actually used. */)
4248 4248
4249 /* Save old undo list and don't record undo for decoding. */ 4249 /* Save old undo list and don't record undo for decoding. */
4250 old_undo = BVAR (current_buffer, undo_list); 4250 old_undo = BVAR (current_buffer, undo_list);
4251 BSET (current_buffer, undo_list, Qt); 4251 bset_undo_list (current_buffer, Qt);
4252 4252
4253 if (NILP (replace)) 4253 if (NILP (replace))
4254 { 4254 {
@@ -4340,7 +4340,7 @@ variable `last-coding-system-used' to the coding system actually used. */)
4340 4340
4341 if (NILP (visit)) 4341 if (NILP (visit))
4342 { 4342 {
4343 BSET (current_buffer, undo_list, old_undo); 4343 bset_undo_list (current_buffer, old_undo);
4344 if (CONSP (old_undo) && inserted != old_inserted) 4344 if (CONSP (old_undo) && inserted != old_inserted)
4345 { 4345 {
4346 /* Adjust the last undo record for the size change during 4346 /* Adjust the last undo record for the size change during
@@ -4355,7 +4355,7 @@ variable `last-coding-system-used' to the coding system actually used. */)
4355 else 4355 else
4356 /* If undo_list was Qt before, keep it that way. 4356 /* If undo_list was Qt before, keep it that way.
4357 Otherwise start with an empty undo_list. */ 4357 Otherwise start with an empty undo_list. */
4358 BSET (current_buffer, undo_list, EQ (old_undo, Qt) ? Qt : Qnil); 4358 bset_undo_list (current_buffer, EQ (old_undo, Qt) ? Qt : Qnil);
4359 4359
4360 unbind_to (count1, Qnil); 4360 unbind_to (count1, Qnil);
4361 } 4361 }
@@ -4595,7 +4595,7 @@ This calls `write-region-annotate-functions' at the start, and
4595 { 4595 {
4596 SAVE_MODIFF = MODIFF; 4596 SAVE_MODIFF = MODIFF;
4597 XSETFASTINT (BVAR (current_buffer, save_length), Z - BEG); 4597 XSETFASTINT (BVAR (current_buffer, save_length), Z - BEG);
4598 BSET (current_buffer, filename, visit_file); 4598 bset_filename (current_buffer, visit_file);
4599 } 4599 }
4600 UNGCPRO; 4600 UNGCPRO;
4601 return val; 4601 return val;
@@ -4811,7 +4811,7 @@ This calls `write-region-annotate-functions' at the start, and
4811 { 4811 {
4812 SAVE_MODIFF = MODIFF; 4812 SAVE_MODIFF = MODIFF;
4813 XSETFASTINT (BVAR (current_buffer, save_length), Z - BEG); 4813 XSETFASTINT (BVAR (current_buffer, save_length), Z - BEG);
4814 BSET (current_buffer, filename, visit_file); 4814 bset_filename (current_buffer, visit_file);
4815 update_mode_lines++; 4815 update_mode_lines++;
4816 } 4816 }
4817 else if (quietly) 4817 else if (quietly)
@@ -5306,7 +5306,7 @@ A non-nil CURRENT-ONLY argument means save only current buffer. */)
5306 FILE *stream = NULL; 5306 FILE *stream = NULL;
5307 ptrdiff_t count = SPECPDL_INDEX (); 5307 ptrdiff_t count = SPECPDL_INDEX ();
5308 int orig_minibuffer_auto_raise = minibuffer_auto_raise; 5308 int orig_minibuffer_auto_raise = minibuffer_auto_raise;
5309 int old_message_p = 0; 5309 bool old_message_p = 0;
5310 struct gcpro gcpro1, gcpro2; 5310 struct gcpro gcpro1, gcpro2;
5311 5311
5312 if (max_specpdl_size < specpdl_size + 40) 5312 if (max_specpdl_size < specpdl_size + 40)