aboutsummaryrefslogtreecommitdiffstats
path: root/src/cmds.c
diff options
context:
space:
mode:
authorKarl Heuer1994-10-04 15:43:31 +0000
committerKarl Heuer1994-10-04 15:43:31 +0000
commit48c7cef2b64d77d06a188d9176c916deaebf0176 (patch)
tree3da0c5fbb2789603cbac66a0711e1b6bd1c13b66 /src/cmds.c
parent18e23fd0bb2cf53bf78ce7daeff0eab691fa863b (diff)
downloademacs-48c7cef2b64d77d06a188d9176c916deaebf0176.tar.gz
emacs-48c7cef2b64d77d06a188d9176c916deaebf0176.zip
(Fforward_char, Fbackward_char, Fbeginning_of_line, Fend_of_line): Don't use
XFASTINT as an lvalue.
Diffstat (limited to 'src/cmds.c')
-rw-r--r--src/cmds.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/src/cmds.c b/src/cmds.c
index 9b4341fb98d..d5cf5b0fedb 100644
--- a/src/cmds.c
+++ b/src/cmds.c
@@ -38,7 +38,7 @@ On reaching end of buffer, stop and signal error.")
38 Lisp_Object n; 38 Lisp_Object n;
39{ 39{
40 if (NILP (n)) 40 if (NILP (n))
41 XFASTINT (n) = 1; 41 XSETFASTINT (n, 1);
42 else 42 else
43 CHECK_NUMBER (n, 0); 43 CHECK_NUMBER (n, 0);
44 44
@@ -74,7 +74,7 @@ On attempt to pass beginning or end of buffer, stop and signal error.")
74 Lisp_Object n; 74 Lisp_Object n;
75{ 75{
76 if (NILP (n)) 76 if (NILP (n))
77 XFASTINT (n) = 1; 77 XSETFASTINT (n, 1);
78 else 78 else
79 CHECK_NUMBER (n, 0); 79 CHECK_NUMBER (n, 0);
80 80
@@ -126,7 +126,7 @@ If scan reaches end of buffer, stop there without error.")
126 Lisp_Object n; 126 Lisp_Object n;
127{ 127{
128 if (NILP (n)) 128 if (NILP (n))
129 XFASTINT (n) = 1; 129 XSETFASTINT (n, 1);
130 else 130 else
131 CHECK_NUMBER (n, 0); 131 CHECK_NUMBER (n, 0);
132 132
@@ -146,7 +146,7 @@ If scan reaches end of buffer, stop there without error.")
146 register int stop; 146 register int stop;
147 147
148 if (NILP (n)) 148 if (NILP (n))
149 XFASTINT (n) = 1; 149 XSETFASTINT (n, 1);
150 else 150 else
151 CHECK_NUMBER (n, 0); 151 CHECK_NUMBER (n, 0);
152 152