summaryrefslogtreecommitdiff
path: root/src/callint.c
diff options
context:
space:
mode:
authorKarl Heuer <kwzh@gnu.org>1994-03-23 22:26:28 +0000
committerKarl Heuer <kwzh@gnu.org>1994-03-23 22:26:28 +0000
commit0d3449810e13256fef55d7ec97e7a620d52fde16 (patch)
tree1f32ac19f2a52fc1019b363b29d537a5e6ac8d22 /src/callint.c
parentcdd870ca5bc82e543f4b9473d892cc6eab377079 (diff)
downloademacs-0d3449810e13256fef55d7ec97e7a620d52fde16.tar.gz
(check_mark, Fcall_interactively): Use assignment, not initialization.
Diffstat (limited to 'src/callint.c')
-rw-r--r--src/callint.c7
1 files changed, 4 insertions, 3 deletions
diff --git a/src/callint.c b/src/callint.c
index 340ab5a617a..c5a57b7ac3f 100644
--- a/src/callint.c
+++ b/src/callint.c
@@ -142,7 +142,8 @@ char *callint_argfuns[]
static void
check_mark ()
{
- Lisp_Object tem = Fmarker_buffer (current_buffer->mark);
+ Lisp_Object tem;
+ tem = Fmarker_buffer (current_buffer->mark);
if (NILP (tem) || (XBUFFER (tem) != current_buffer))
error ("The mark is not set now");
if (!NILP (Vtransient_mark_mode) && NILP (Vmark_even_if_inactive)
@@ -321,9 +322,9 @@ Otherwise, this is done only if an arg is read using the minibuffer.")
}
else if (*string == '@')
{
- Lisp_Object event =
- XVECTOR (this_command_keys)->contents[next_event];
+ Lisp_Object event;
+ event = XVECTOR (this_command_keys)->contents[next_event];
if (EVENT_HAS_PARAMETERS (event)
&& XTYPE (event = XCONS (event)->cdr) == Lisp_Cons
&& XTYPE (event = XCONS (event)->car) == Lisp_Cons