diff options
| author | Karl Heuer | 1994-10-04 11:39:56 +0000 |
|---|---|---|
| committer | Karl Heuer | 1994-10-04 11:39:56 +0000 |
| commit | 6520d056e81ff6acfdbe63a2bada9b7f81e97df1 (patch) | |
| tree | c262b5e0cab30b1a6889fdca8536c9030a12008a | |
| parent | df0f379b96fe6d9d11d6e18e3b27596d5c53e0c6 (diff) | |
| download | emacs-6520d056e81ff6acfdbe63a2bada9b7f81e97df1.tar.gz emacs-6520d056e81ff6acfdbe63a2bada9b7f81e97df1.zip | |
(write_abbrev, Finsert_abbrev_table_description): Use new accessor macros
instead of calling XSET directly.
| -rw-r--r-- | src/abbrev.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/abbrev.c b/src/abbrev.c index 37e92acc5fa..ea7b619254a 100644 --- a/src/abbrev.c +++ b/src/abbrev.c | |||
| @@ -377,7 +377,7 @@ write_abbrev (sym, stream) | |||
| 377 | if (NILP (XSYMBOL (sym)->value)) | 377 | if (NILP (XSYMBOL (sym)->value)) |
| 378 | return; | 378 | return; |
| 379 | insert (" (", 5); | 379 | insert (" (", 5); |
| 380 | XSET (name, Lisp_String, XSYMBOL (sym)->name); | 380 | XSETSTRING (name, XSYMBOL (sym)->name); |
| 381 | Fprin1 (name, stream); | 381 | Fprin1 (name, stream); |
| 382 | insert (" ", 1); | 382 | insert (" ", 1); |
| 383 | Fprin1 (XSYMBOL (sym)->value, stream); | 383 | Fprin1 (XSYMBOL (sym)->value, stream); |
| @@ -429,7 +429,7 @@ define the abbrev table NAME exactly as it is currently defined.") | |||
| 429 | table = Fsymbol_value (name); | 429 | table = Fsymbol_value (name); |
| 430 | CHECK_VECTOR (table, 0); | 430 | CHECK_VECTOR (table, 0); |
| 431 | 431 | ||
| 432 | XSET (stream, Lisp_Buffer, current_buffer); | 432 | XSETBUFFER (stream, current_buffer); |
| 433 | 433 | ||
| 434 | if (!NILP (readable)) | 434 | if (!NILP (readable)) |
| 435 | { | 435 | { |