Commit 7d0393cf authored by Juanma Barranquero's avatar Juanma Barranquero

Fix typo in comment.

parent d49e7392
......@@ -6313,7 +6313,7 @@ highest priority. */)
the detecting source. Then code detectors can handle the tailing
byte sequence more accurately.
Fix me: This is not an perfect solution. It is better that we
Fix me: This is not a perfect solution. It is better that we
add one more argument, say LAST_BLOCK, to all detect_coding_XXX.
*/
if (to == Z || (to == GPT && GAP_SIZE > 0))
......@@ -6538,7 +6538,7 @@ unencodable_char_position (safe_chars, pos, p, pend, n)
{
int len;
int c = STRING_CHAR_AND_LENGTH (p, MAX_MULTIBYTE_LENGTH, len);
if (c >= 128
&& (CHAR_TABLE_P (safe_chars)
? NILP (CHAR_TABLE_REF (safe_chars, c))
......
......@@ -158,7 +158,7 @@ Lisp_Object Vprevious_system_messages_locale;
Lisp_Object Vsystem_time_locale;
Lisp_Object Vprevious_system_time_locale;
/* If non-zero, emacs should not attempt to use an window-specific code,
/* If non-zero, emacs should not attempt to use a window-specific code,
but instead should use the virtual terminal under which it was started. */
int inhibit_window_system;
......
......@@ -347,10 +347,10 @@ rotate_right (interval)
/* Assuming that a right child exists, perform the following operation:
A B
/ \ / \
A B
/ \ / \
B => A
/ \ / \
/ \ / \
c c
*/
......@@ -524,7 +524,7 @@ split_interval_right (interval, offset)
new->total_length = new_length + new->right->total_length;
balance_an_interval (new);
}
balance_possible_root_interval (interval);
return new;
......@@ -569,7 +569,7 @@ split_interval_left (interval, offset)
new->total_length = new_length + new->left->total_length;
balance_an_interval (new);
}
balance_possible_root_interval (interval);
return new;
......@@ -754,39 +754,39 @@ update_interval (i, pos)
if (NULL_INTERVAL_P (i))
return NULL_INTERVAL;
while (1)
while (1)
{
if (pos < i->position)
if (pos < i->position)
{
/* Move left. */
if (pos >= i->position - TOTAL_LENGTH (i->left))
if (pos >= i->position - TOTAL_LENGTH (i->left))
{
i->left->position = i->position - TOTAL_LENGTH (i->left)
+ LEFT_TOTAL_LENGTH (i->left);
i = i->left; /* Move to the left child */
}
else if (NULL_PARENT (i))
else if (NULL_PARENT (i))
error ("Point before start of properties");
else
else
i = INTERVAL_PARENT (i);
continue;
}
else if (pos >= INTERVAL_LAST_POS (i))
{
/* Move right. */
if (pos < INTERVAL_LAST_POS (i) + TOTAL_LENGTH (i->right))
if (pos < INTERVAL_LAST_POS (i) + TOTAL_LENGTH (i->right))
{
i->right->position = INTERVAL_LAST_POS (i) +
LEFT_TOTAL_LENGTH (i->right);
i = i->right; /* Move to the right child */
}
else if (NULL_PARENT (i))
else if (NULL_PARENT (i))
error ("Point after end of properties");
else
else
i = INTERVAL_PARENT (i);
continue;
}
else
else
return i;
}
}
......@@ -874,7 +874,7 @@ adjust_intervals_for_insertion (tree, position, length)
int eobp = 0;
Lisp_Object parent;
int offset;
if (TOTAL_LENGTH (tree) == 0) /* Paranoia */
abort ();
......@@ -989,7 +989,7 @@ adjust_intervals_for_insertion (tree, position, length)
temp->total_length += length;
temp = balance_possible_root_interval (temp);
}
/* If at least one interval has sticky properties,
we check the stickiness property by property.
......@@ -1046,7 +1046,7 @@ adjust_intervals_for_insertion (tree, position, length)
temp = balance_possible_root_interval (temp);
}
}
return tree;
}
......@@ -1212,7 +1212,7 @@ merge_properties_sticky (pleft, pright)
cat = textget (props, Qcategory);
if (! NILP (front)
&&
&&
/* If we have inherited a front-stick category property that is t,
we don't need to set up a detailed one. */
! (! NILP (cat) && SYMBOLP (cat)
......@@ -1222,7 +1222,7 @@ merge_properties_sticky (pleft, pright)
}
/* Delete an node I from its interval tree by merging its subtrees
/* Delete a node I from its interval tree by merging its subtrees
into one subtree which is then returned. Caller is responsible for
storing the resulting subtree into its parent. */
......@@ -1351,7 +1351,7 @@ interval_deletion_adjustment (tree, from, amount)
else
{
/* How much can we delete from this interval? */
int my_amount = ((tree->total_length
int my_amount = ((tree->total_length
- RIGHT_TOTAL_LENGTH (tree))
- relative_position);
......@@ -1361,7 +1361,7 @@ interval_deletion_adjustment (tree, from, amount)
tree->total_length -= amount;
if (LENGTH (tree) == 0)
delete_interval (tree);
return amount;
}
......@@ -1780,7 +1780,7 @@ graft_intervals_into_buffer (source, position, length, buffer, inherit)
The properties of under are the result of
adjust_intervals_for_insertion, so stickiness has
already been taken care of. */
while (! NULL_INTERVAL_P (over))
{
if (LENGTH (over) < LENGTH (under))
......@@ -1805,7 +1805,7 @@ graft_intervals_into_buffer (source, position, length, buffer, inherit)
/* Get the value of property PROP from PLIST,
which is the plist of an interval.
We check for direct properties, for categories with property PROP,
We check for direct properties, for categories with property PROP,
and for PROP appearing on the default-text-properties list. */
Lisp_Object
......@@ -1887,7 +1887,7 @@ temp_set_point_both (buffer, charpos, bytepos)
BUF_PT (buffer) = charpos;
}
/* Set point in BUFFER to CHARPOS. If the target position is
/* Set point in BUFFER to CHARPOS. If the target position is
before an intangible character, move to an ok place. */
void
......@@ -1907,7 +1907,7 @@ set_point (buffer, charpos)
TEST_OFFS should be either 0 or -1, and ADJ should be either 1 or -1.
Note that `stickiness' is determined by overlay marker insertion types,
if the invisible property comes from an overlay. */
if the invisible property comes from an overlay. */
static int
adjust_for_invis_intang (pos, test_offs, adj, test_intang)
......@@ -1945,7 +1945,7 @@ adjust_for_invis_intang (pos, test_offs, adj, test_intang)
}
/* Set point in BUFFER to CHARPOS, which corresponds to byte
position BYTEPOS. If the target position is
position BYTEPOS. If the target position is
before an intangible character, move to an ok place. */
void
......@@ -2218,7 +2218,7 @@ move_if_not_intangible (position)
}
/* If the whole stretch between PT and POSITION isn't intangible,
/* If the whole stretch between PT and POSITION isn't intangible,
try moving to POSITION (which means we actually move farther
if POSITION is inside of intangible text). */
......@@ -2265,7 +2265,7 @@ get_property_and_range (pos, prop, val, start, end, object)
*start = i->position;
next = next_interval (i);
while (! NULL_INTERVAL_P (next)
while (! NULL_INTERVAL_P (next)
&& EQ (*val, textget (next->plist, prop)))
i = next, next = next_interval (next);
*end = i->position + LENGTH (i);
......
This diff is collapsed.
......@@ -326,7 +326,7 @@ check_x_frame (frame)
return f;
}
/* Let the user specify an display with a frame.
/* Let the user specify a display with a frame.
nil stands for the selected frame--or, if that is not a mac frame,
the first display on the list. */
......@@ -363,7 +363,7 @@ check_x_display_info (frame)
}
}
/* Return the Emacs frame-object corresponding to an mac window.
/* Return the Emacs frame-object corresponding to a mac window.
It could be the frame's main window or an icon window. */
/* This function can be called during GC, so use GC_xxx type test macros. */
......@@ -1969,7 +1969,7 @@ x_to_mac_color (colorname)
if (value < 0.0 || value > 1.0)
break;
val = (unsigned long)(0x100 * value);
/* We used 0x100 instead of 0xFF to give an continuous
/* We used 0x100 instead of 0xFF to give a continuous
range between 0.0 and 1.0 inclusive. The next statement
fixes the 1.0 case. */
if (val == 0x100)
......@@ -2355,7 +2355,7 @@ x_set_cursor_color (f, arg, oldval)
/* Set the border-color of frame F to pixel value PIX.
Note that this does not fully take effect if done before
F has an window. */
F has a window. */
void
x_set_border_pixel (f, pix)
struct frame *f;
......@@ -3011,7 +3011,7 @@ x_set_scroll_bar_width (f, arg, oldval)
XWINDOW (FRAME_SELECTED_WINDOW (f))->cursor.x = 0;
}
/* Subroutines of creating an frame. */
/* Subroutines of creating a frame. */
/* Make sure that Vx_resource_name is set to a reasonable value.
Fix it up, or set it to `emacs' if it is too hopeless. */
......@@ -9471,7 +9471,7 @@ x_create_tip_frame (dpyinfo, parms)
f->height = 0;
SET_FRAME_WIDTH (f, 0);
change_frame_size (f, height, width, 1, 0, 0);
/* Add `tooltip' frame parameter's default value. */
if (NILP (Fframe_parameter (frame, intern ("tooltip"))))
Fmodify_frame_parameters (frame, Fcons (Fcons (intern ("tooltip"), Qt),
......
......@@ -199,7 +199,7 @@ update_syntax_table (charpos, count, init, object)
if (invalidate)
invalidate = !EQ (tmp_table, gl_state.old_prop); /* Need to invalidate? */
if (invalidate) /* Did not get to adjacent interval. */
{ /* with the same table => */
/* invalidate the old range. */
......@@ -222,13 +222,13 @@ update_syntax_table (charpos, count, init, object)
if (EQ (Fsyntax_table_p (tmp_table), Qt))
{
gl_state.use_global = 0;
}
}
else if (CONSP (tmp_table))
{
gl_state.use_global = 1;
gl_state.global_code = tmp_table;
}
else
else
{
gl_state.use_global = 0;
gl_state.current_syntax_table = current_buffer->syntax_table;
......@@ -251,7 +251,7 @@ update_syntax_table (charpos, count, init, object)
}
return;
}
else if (cnt == INTERVALS_AT_ONCE)
else if (cnt == INTERVALS_AT_ONCE)
{
if (count > 0)
{
......@@ -428,7 +428,7 @@ prev_char_comend_first (pos, pos_byte)
* int pos, pos_byte;
* {
* int c, val;
*
*
* DEC_BOTH (pos, pos_byte);
* UPDATE_SYNTAX_TABLE_BACKWARD (pos);
* c = FETCH_CHAR (pos_byte);
......@@ -468,7 +468,7 @@ back_comment (from, from_byte, stop, comnested, comstyle, charpos_ptr, bytepos_p
int string_style = -1; /* Presumed outside of any string. */
int string_lossage = 0;
/* Not a real lossage: indicates that we have passed a matching comment
starter plus an non-matching comment-ender, meaning that any matching
starter plus a non-matching comment-ender, meaning that any matching
comment-starter we might see later could be a false positive (hidden
inside another comment).
Test case: { a (* b } c (* d *) */
......@@ -584,7 +584,7 @@ back_comment (from, from_byte, stop, comnested, comstyle, charpos_ptr, bytepos_p
There's no way to grok this scanning backwards. */
string_lossage = 1;
break;
case Scomment:
/* We've already checked that it is the relevant comstyle. */
if (string_style != -1 || comment_lossage || string_lossage)
......@@ -705,7 +705,7 @@ back_comment (from, from_byte, stop, comnested, comstyle, charpos_ptr, bytepos_p
from_byte = CHAR_TO_BYTE (from);
UPDATE_SYNTAX_TABLE_FORWARD (from - 1);
}
done:
*charpos_ptr = from;
*bytepos_ptr = from_byte;
......@@ -732,7 +732,7 @@ check_syntax_table (obj)
if (!(CHAR_TABLE_P (obj)
&& EQ (XCHAR_TABLE (obj)->purpose, Qsyntax_table)))
wrong_type_argument (Qsyntax_table_p, obj);
}
}
DEFUN ("syntax-table", Fsyntax_table, Ssyntax_table, 0, 0, 0,
doc: /* Return the current syntax table.
......@@ -961,7 +961,7 @@ text property. */)
val |= 1 << 22;
break;
}
if (val < XVECTOR (Vsyntax_code_object)->size && NILP (match))
return XVECTOR (Vsyntax_code_object)->contents[val];
else
......@@ -971,7 +971,7 @@ text property. */)
/* I really don't know why this is interactive
help-form should at least be made useful whilst reading the second arg. */
DEFUN ("modify-syntax-entry", Fmodify_syntax_entry, Smodify_syntax_entry, 2, 3,
DEFUN ("modify-syntax-entry", Fmodify_syntax_entry, Smodify_syntax_entry, 2, 3,
"cSet syntax for character: \nsSet syntax for %s to: ",
doc: /* Set syntax for character CHAR according to string NEWENTRY.
The syntax is changed only for table SYNTAX_TABLE, which defaults to
......@@ -1293,7 +1293,7 @@ and the function returns nil. Field boundaries are not noticed if
/* Avoid jumping out of an input field. */
val = XFASTINT (Fconstrain_to_field (make_number (val), make_number (PT),
Qt, Qnil, Qnil));
SET_PT (val);
return val == orig_val ? Qt : Qnil;
}
......@@ -1729,7 +1729,7 @@ forw_comment (from, from_byte, stop, nesting, style, prev_syntax,
nesting++;
INC_BOTH (from, from_byte);
UPDATE_SYNTAX_TABLE_FORWARD (from);
forw_incomment:
if (from < stop && SYNTAX_FLAGS_COMEND_FIRST (syntax)
&& SYNTAX_FLAGS_COMMENT_STYLE (syntax) == style
......@@ -1826,7 +1826,7 @@ between them, return t; otherwise return nil. */)
&& (c1 = FETCH_CHAR (from_byte),
SYNTAX_COMSTART_SECOND (c1)))
{
/* We have encountered a comment start sequence and we
/* We have encountered a comment start sequence and we
are ignoring all text inside comments. We must record
the comment style this sequence begins so that later,
only a comment end of the same style actually ends
......@@ -1907,7 +1907,7 @@ between them, return t; otherwise return nil. */)
{
/* Skip until first preceding unquoted comment_fence. */
int found = 0, ini = from, ini_byte = from_byte;
while (1)
{
DEC_BOTH (from, from_byte);
......@@ -1916,9 +1916,9 @@ between them, return t; otherwise return nil. */)
UPDATE_SYNTAX_TABLE_BACKWARD (from);
c = FETCH_CHAR (from_byte);
if (SYNTAX (c) == Scomment_fence
&& !char_quoted (from, from_byte))
&& !char_quoted (from, from_byte))
{
found = 1;
found = 1;
break;
}
}
......@@ -2036,7 +2036,7 @@ scan_lists (from, count, depth, sexpflag)
&& SYNTAX_COMSTART_SECOND (FETCH_CHAR (from_byte))
&& parse_sexp_ignore_comments)
{
/* we have encountered a comment start sequence and we
/* we have encountered a comment start sequence and we
are ignoring all text inside comments. We must record
the comment style this sequence begins so that later,
only a comment end of the same style actually ends
......@@ -2048,7 +2048,7 @@ scan_lists (from, count, depth, sexpflag)
INC_BOTH (from, from_byte);
UPDATE_SYNTAX_TABLE_FORWARD (from);
}
if (prefix)
continue;
......@@ -2209,7 +2209,7 @@ scan_lists (from, count, depth, sexpflag)
comstyle = SYNTAX_COMMENT_STYLE (c1);
comnested = comnested || SYNTAX_COMMENT_NESTED (c1);
}
/* Quoting turns anything except a comment-ender
into a word character. Note that this cannot be true
if we decremented FROM in the if-statement above. */
......@@ -2310,14 +2310,14 @@ scan_lists (from, count, depth, sexpflag)
DEC_BOTH (from, from_byte);
if (from == stop) goto lose;
UPDATE_SYNTAX_TABLE_BACKWARD (from);
if (!char_quoted (from, from_byte)
if (!char_quoted (from, from_byte)
&& (c = FETCH_CHAR (from_byte),
SYNTAX_WITH_MULTIBYTE_CHECK (c) == code))
break;
}
if (code == Sstring_fence && !depth && sexpflag) goto done2;
break;
case Sstring:
stringterm = FETCH_CHAR (from_byte);
while (1)
......@@ -2425,7 +2425,7 @@ This includes chars with "quote" or "prefix" syntax (' or p). */)
int pos_byte = PT_BYTE;
int c;
if (pos <= beg)
if (pos <= beg)
{
SET_PT_BOTH (opoint, opoint_byte);
......@@ -2533,8 +2533,8 @@ do { prev_from = from; \
oldstate = Fcdr (oldstate);
tem = Fcar (oldstate);
/* Check whether we are inside string_fence-style string: */
state.instring = (!NILP (tem)
? (INTEGERP (tem) ? XINT (tem) : ST_STRING_STYLE)
state.instring = (!NILP (tem)
? (INTEGERP (tem) ? XINT (tem) : ST_STRING_STYLE)
: -1);
oldstate = Fcdr (oldstate);
......@@ -2552,7 +2552,7 @@ do { prev_from = from; \
oldstate = Fcdr (oldstate);
oldstate = Fcdr (oldstate);
tem = Fcar (oldstate);
state.comstyle = NILP (tem) ? 0 : (EQ (tem, Qsyntax_table)
state.comstyle = NILP (tem) ? 0 : (EQ (tem, Qsyntax_table)
? ST_COMMENT_STYLE : 1);
oldstate = Fcdr (oldstate);
......@@ -2735,14 +2735,14 @@ do { prev_from = from; \
state.comstr_start = from - 1;
if (stopbefore) goto stop; /* this arg means stop at sexp start */
curlevel->last = prev_from;
state.instring = (code == Sstring
state.instring = (code == Sstring
? (FETCH_CHAR (prev_from_byte))
: ST_STRING_STYLE);
if (boundary_stop) goto done;
startinstring:
{
nofence = state.instring != ST_STRING_STYLE;
while (1)
{
int c;
......@@ -2824,7 +2824,7 @@ Value is a list of ten elements describing final state of parsing:
3. non-nil if inside a string.
(it is the character that will terminate the string,
or t if the string should be terminated by a generic string delimiter.)
4. nil if outside a comment, t if inside a non-nestable comment,
4. nil if outside a comment, t if inside a non-nestable comment,
else an integer (the current comment nesting).
5. t if following a quote character.
6. the minimum paren-depth encountered during this scan.
......@@ -2860,23 +2860,23 @@ Sixth arg COMMENTSTOP non-nil means stop at the start of a comment.
scan_sexps_forward (&state, XINT (from), CHAR_TO_BYTE (XINT (from)),
XINT (to),
target, !NILP (stopbefore), oldstate,
(NILP (commentstop)
(NILP (commentstop)
? 0 : (EQ (commentstop, Qsyntax_table) ? -1 : 1)));
SET_PT (state.location);
return Fcons (make_number (state.depth),
Fcons (state.prevlevelstart < 0 ? Qnil : make_number (state.prevlevelstart),
Fcons (state.thislevelstart < 0 ? Qnil : make_number (state.thislevelstart),
Fcons (state.instring >= 0
? (state.instring == ST_STRING_STYLE
Fcons (state.instring >= 0
? (state.instring == ST_STRING_STYLE
? Qt : make_number (state.instring)) : Qnil,
Fcons (state.incomment < 0 ? Qt :
(state.incomment == 0 ? Qnil :
make_number (state.incomment)),
Fcons (state.quoted ? Qt : Qnil,
Fcons (make_number (state.mindepth),
Fcons ((state.comstyle
Fcons ((state.comstyle
? (state.comstyle == ST_COMMENT_STYLE
? Qsyntax_table : Qt) :
Qnil),
......
This diff is collapsed.
......@@ -1531,7 +1531,7 @@ init_iterator (it, w, charpos, bytepos, row, base_face_id)
/* If face attributes have been changed since the last redisplay,
free realized faces now because they depend on face definitions
that might have changed. Don't free faces while there might be
that might have changed. Don't free faces while there might be
desired matrices pending which reference these faces. */
if (face_change_count && !inhibit_free_realized_faces)
{
......@@ -4215,7 +4215,7 @@ int
get_next_display_element (it)
struct it *it;
{
/* Non-zero means that we found an display element. Zero means that
/* Non-zero means that we found a display element. Zero means that
we hit the end of what we iterate over. Performance note: the
function pointer `method' used here turns out to be faster than
using a sequence of if-statements. */
......@@ -9033,7 +9033,7 @@ redisplay_internal (preserve_echo_area)
redisplay_window_error);
/* Compare desired and current matrices, perform output. */
update:
/* If fonts changed, display again. */
if (fonts_changed_p)
......@@ -13751,7 +13751,7 @@ static Lisp_Object mode_line_string_face_prop;
PROPS is a property list to add to any string we encounter.
If RISKY is nonzero, remove (disregard) any properties in any string
If RISKY is nonzero, remove (disregard) any properties in any string
we encounter, and ignore :eval and :propertize.
If the global variable `frame_title_ptr' is non-NULL, then the output
......@@ -14165,7 +14165,7 @@ display_mode_element (it, depth, field_width, precision, elt, props, risky)
If COPY_STRING is non-zero, make a copy of LISP_STRING before adding
properties to the string.
PROPS are the properties to add to the string.
PROPS are the properties to add to the string.
The mode_line_string_face face property is always added to the string.
*/
......@@ -14201,7 +14201,7 @@ static int store_mode_line_string (string, lisp_string, copy_string, field_width
Fadd_text_properties (make_number (0), make_number (len),
props, lisp_string);
}
else
else
{
len = XFASTINT (Flength (lisp_string));
if (precision > 0 && len > precision)
......@@ -14232,7 +14232,7 @@ static int store_mode_line_string (string, lisp_string, copy_string, field_width
if (len > 0)
{
mode_line_string_list = Fcons (lisp_string, mode_line_string_list);
n += len;
n += len;
}
if (field_width > len)
......@@ -14243,7 +14243,7 @@ static int store_mode_line_string (string, lisp_string, copy_string, field_width
Fadd_text_properties (make_number (0), make_number (field_width),
props, lisp_string);
mode_line_string_list = Fcons (lisp_string, mode_line_string_list);
n += field_width;
n += field_width;
}
return n;
......@@ -14305,7 +14305,7 @@ If third optional arg NO-PROPS is non-nil, string is not propertized. */)
/* We need a dummy last element in mode_line_string_list to
indicate we are building the propertized mode-line string.
Using mode_line_string_face_prop here GC protects it. */
mode_line_string_list =
mode_line_string_list =
Fcons (mode_line_string_face_prop, Qnil);
frame_title_ptr = NULL;
}
......@@ -15214,7 +15214,7 @@ get_specified_cursor_type (arg, width)
int *width;
{
enum text_cursor_kinds type;
if (NILP (arg))
return NO_CURSOR;
......@@ -15369,8 +15369,8 @@ get_window_cursor_type (w, width)
*width = FRAME_BLINK_OFF_CURSOR_WIDTH (f);
return FRAME_BLINK_OFF_CURSOR (f);
}
/* Finally perform built-in cursor blinking:
/* Finally perform built-in cursor blinking:
filled box <-> hollow box
wide [h]bar <-> narrow [h]bar
narrow [h]bar <-> no cursor
......
......@@ -98,7 +98,7 @@ Lisp_Object Vx_session_previous_id;
open to a session manager, just return 0.
Otherwise returns the number of events stored in buffer BUFP,
which can hold up to *NUMCHARS characters. At most one event is
stored, an SAVE_SESSION_EVENT. */
stored, a SAVE_SESSION_EVENT. */
int
x_session_check_input (bufp, numchars)
struct input_event *bufp;
......@@ -106,15 +106,15 @@ x_session_check_input (bufp, numchars)
{
SELECT_TYPE read_fds;
EMACS_TIME tmout;
if (ice_fd == -1) return 0;
FD_ZERO (&read_fds);
FD_SET (ice_fd, &read_fds);
tmout.tv_sec = 0;
tmout.tv_usec = 0;
/* Reset this so wo can check kind after callbacks have been called by
IceProcessMessages. The smc_interact_CB sets the kind to
SAVE_SESSION_EVENT, but we don't know beforehand if that callback
......@@ -127,13 +127,13 @@ x_session_check_input (bufp, numchars)
ice_fd = -1;
return 0;
}
if (FD_ISSET (ice_fd, &read_fds))
IceProcessMessages (SmcGetIceConnection (smc_conn),
(IceReplyWaitInfo *)0, (Bool *)0);
/* Check if smc_interact_CB was called and we shall generate a
SAVE_SESSION_EVENT. */
if (*numchars > 0 && emacs_event.kind != NO_EVENT)
......@@ -189,14 +189,14 @@ smc_save_yourself_CB (smcConn,