comparison src/fileio.c @ 17558:648beff801bb

(Fwrite_region): GCPRO `start' near the beginning.
author Richard M. Stallman <rms@gnu.org>
date Fri, 25 Apr 1997 04:59:48 +0000
parents ba848dceb1c9
children 331ce9fbf08b
comparison
equal deleted inserted replaced
17557:3e3f18e8d969 17558:648beff801bb
3798 error ("Cannot do file visiting in an indirect buffer"); 3798 error ("Cannot do file visiting in an indirect buffer");
3799 3799
3800 if (!NILP (start) && !STRINGP (start)) 3800 if (!NILP (start) && !STRINGP (start))
3801 validate_region (&start, &end); 3801 validate_region (&start, &end);
3802 3802
3803 GCPRO3 (filename, visit, lockname); 3803 GCPRO4 (start, filename, visit, lockname);
3804 filename = Fexpand_file_name (filename, Qnil); 3804 filename = Fexpand_file_name (filename, Qnil);
3805 if (STRINGP (visit)) 3805 if (STRINGP (visit))
3806 visit_file = Fexpand_file_name (visit, Qnil); 3806 visit_file = Fexpand_file_name (visit, Qnil);
3807 else 3807 else
3808 visit_file = filename; 3808 visit_file = filename;