aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKarl Heuer1994-10-04 12:05:13 +0000
committerKarl Heuer1994-10-04 12:05:13 +0000
commit46283abed575444204ef9a41bda991034f48aaa6 (patch)
tree4445e0ee68b6e122c13498a65981aff3965e8273
parentd2fd0445cb8a179295daa6d1b7d5dcbedd33eb9a (diff)
downloademacs-46283abed575444204ef9a41bda991034f48aaa6.tar.gz
emacs-46283abed575444204ef9a41bda991034f48aaa6.zip
(Fdefault_file_modes, Finsert_file_contents, Fdo_auto_save): Use new accessor
macros instead of calling XSET directly.
-rw-r--r--src/fileio.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/fileio.c b/src/fileio.c
index 855e5d41808..c6d4f45ca1a 100644
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -2526,7 +2526,7 @@ The value is an integer.")
2526 realmask = umask (0); 2526 realmask = umask (0);
2527 umask (realmask); 2527 umask (realmask);
2528 2528
2529 XSET (value, Lisp_Int, (~ realmask) & 0777); 2529 XSETINT (value, (~ realmask) & 0777);
2530 return value; 2530 return value;
2531} 2531}
2532 2532
@@ -2817,7 +2817,7 @@ and (2) it puts less data in the undo list.")
2817 register Lisp_Object temp; 2817 register Lisp_Object temp;
2818 2818
2819 /* Make sure point-max won't overflow after this insertion. */ 2819 /* Make sure point-max won't overflow after this insertion. */
2820 XSET (temp, Lisp_Int, total); 2820 XSETINT (temp, total);
2821 if (total != XINT (temp)) 2821 if (total != XINT (temp))
2822 error ("maximum buffer size exceeded"); 2822 error ("maximum buffer size exceeded");
2823 } 2823 }
@@ -3699,7 +3699,7 @@ Non-nil second argument means save only current buffer.")
3699 XSTRING (b->name)->data); 3699 XSTRING (b->name)->data);
3700 /* Turn off auto-saving until there's a real save, 3700 /* Turn off auto-saving until there's a real save,
3701 and prevent any more warnings. */ 3701 and prevent any more warnings. */
3702 XSET (b->save_length, Lisp_Int, -1); 3702 XSETINT (b->save_length, -1);
3703 Fsleep_for (make_number (1), Qnil); 3703 Fsleep_for (make_number (1), Qnil);
3704 continue; 3704 continue;
3705 } 3705 }