1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-22 07:09:54 +00:00

* xterm.c (x_catch_errors, x_clear_errors): Use SSET.

This commit is contained in:
Ken Raeburn 2002-07-16 15:50:57 +00:00
parent b06a00fb6d
commit 7da167cde1
2 changed files with 28 additions and 3 deletions

View File

@ -1,6 +1,31 @@
2002-07-16 Ken Raeburn <raeburn@gnu.org>
* lisp.h (SDATA): Produce rvalue.
* lisp.h (SDATA, SREF): Produce rvalue.
(SSET): New macro.
* alloc.c (make_event_array): Use SSET for storing into a string.
* buffer.c (Fother_buffer): Use SREF when retrieving a byte from
a string.
* casefiddle.c (casify_object): Use SSET.
* charset.h (FETCH_STRING_CHAR_ADVANCE,
FETCH_STRING_CHAR_ADVANCE_NO_CHECK): Use SDATA when getting
address of string contents.
* data.c (Faref): Use SDATA.
(Faset): Use SDATA, SSET.
* dired.c (directory_files_internal): Use SSET.
* fileio.c (Fmake_symbolic_link, Fexpand_file_name): Use SSET.
(Fread_file_name): Use SREF, SSET.
* fns.c (concat): Use SSET.
(concat, Fdelete): Use SDATA.
* insdel.c (insert_from_string_1): Use SDATA.
* keyboard.c (Fevent_convert_list): Use SREF.
* lread.c (Fload): Use SDATA, SSET.
* macfns.c (validate_x_resource_name): Use SSET.
* process.c (status_message): Use SSET.
* search.c (wordify): Use SDATA.
(Freplace_match): Use SREF.
* w32fns.c (validate_x_resource_name): Use SSET.
* xfns.c (validate_x_resource_name): Use SSET.
* xterm.c (x_catch_errors, x_clear_errors): Use SSET.
2002-07-16 Richard M. Stallman <rms@gnu.org>

View File

@ -12131,7 +12131,7 @@ x_catch_errors (dpy)
record_unwind_protect (x_catch_errors_unwind, x_error_message_string);
x_error_message_string = make_uninit_string (X_ERROR_MESSAGE_SIZE);
SREF (x_error_message_string, 0) = 0;
SSET (x_error_message_string, 0, 0);
return count;
}
@ -12181,7 +12181,7 @@ void
x_clear_errors (dpy)
Display *dpy;
{
SREF (x_error_message_string, 0) = 0;
SSET (x_error_message_string, 0, 0);
}
/* Stop catching X protocol errors and let them make Emacs die.