Mercurial > emacs
comparison src/macros.c @ 9314:2c681685646b
(Fend_kbd_macro, Fexecute_kbd_macro): Don't use XFASTINT as an lvalue.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Tue, 04 Oct 1994 16:06:40 +0000 |
parents | 9ba3f17d6631 |
children | e00a48bb7ad4 |
comparison
equal
deleted
inserted
replaced
9313:ed68c3822e4b | 9314:2c681685646b |
---|---|
96 { | 96 { |
97 if (!defining_kbd_macro) | 97 if (!defining_kbd_macro) |
98 error ("Not defining kbd macro."); | 98 error ("Not defining kbd macro."); |
99 | 99 |
100 if (NILP (arg)) | 100 if (NILP (arg)) |
101 XFASTINT (arg) = 1; | 101 XSETFASTINT (arg, 1); |
102 else | 102 else |
103 CHECK_NUMBER (arg, 0); | 103 CHECK_NUMBER (arg, 0); |
104 | 104 |
105 if (defining_kbd_macro) | 105 if (defining_kbd_macro) |
106 { | 106 { |
203 | 203 |
204 final = indirect_function (macro); | 204 final = indirect_function (macro); |
205 if (!STRINGP (final) && !VECTORP (final)) | 205 if (!STRINGP (final) && !VECTORP (final)) |
206 error ("Keyboard macros must be strings or vectors."); | 206 error ("Keyboard macros must be strings or vectors."); |
207 | 207 |
208 XFASTINT (tem) = executing_macro_index; | 208 XSETFASTINT (tem, executing_macro_index); |
209 tem = Fcons (Vexecuting_macro, tem); | 209 tem = Fcons (Vexecuting_macro, tem); |
210 record_unwind_protect (pop_kbd_macro, tem); | 210 record_unwind_protect (pop_kbd_macro, tem); |
211 | 211 |
212 GCPRO1 (final); | 212 GCPRO1 (final); |
213 do | 213 do |