diff options
| author | Ken Raeburn | 2002-05-19 23:14:24 +0000 |
|---|---|---|
| committer | Ken Raeburn | 2002-05-19 23:14:24 +0000 |
| commit | 7340cc503b7543c86162a84c0f8bf98322450116 (patch) | |
| tree | e602ceb5d0443963d1beca2077d9721c2e1f5f62 /src | |
| parent | 1138e74218b2b5a2912580751740351a73180070 (diff) | |
| download | emacs-7340cc503b7543c86162a84c0f8bf98322450116.tar.gz emacs-7340cc503b7543c86162a84c0f8bf98322450116.zip | |
* lisp.h (LISP_MAKE_RVALUE): Delete disabled version, making XCAR and XCDR real
rvalues in most configurations.
Diffstat (limited to 'src')
| -rw-r--r-- | src/ChangeLog | 10 | ||||
| -rw-r--r-- | src/lisp.h | 5 |
2 files changed, 10 insertions, 5 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index e60eaf41a9e..961264c0278 100644 --- a/src/ChangeLog +++ b/src/ChangeLog | |||
| @@ -1,3 +1,13 @@ | |||
| 1 | 2002-05-19 Ken Raeburn <raeburn@gnu.org> | ||
| 2 | |||
| 3 | * lisp.h (LISP_MAKE_RVALUE): Delete disabled version, making XCAR | ||
| 4 | and XCDR real rvalues in most configurations. | ||
| 5 | |||
| 6 | * buffer.c (fix_overlays_in_range, fix_overlays_before): Don't | ||
| 7 | take the address of the cdr part of a cons cell; instead, track | ||
| 8 | the parent cell and call XSETCDR, or set the variable for the head | ||
| 9 | of the list if we haven't started down the list yet. | ||
| 10 | |||
| 1 | 2002-05-19 Richard M. Stallman <rms@gnu.org> | 11 | 2002-05-19 Richard M. Stallman <rms@gnu.org> |
| 2 | 12 | ||
| 3 | * doc.c (reread_doc_file): Don't ask for confirmation. | 13 | * doc.c (reread_doc_file): Don't ask for confirmation. |
diff --git a/src/lisp.h b/src/lisp.h index b4997f484fc..3f9cee4474d 100644 --- a/src/lisp.h +++ b/src/lisp.h | |||
| @@ -629,11 +629,6 @@ struct Lisp_Cons | |||
| 629 | #define XCDR_AS_LVALUE(c) (XCONS ((c))->cdr) | 629 | #define XCDR_AS_LVALUE(c) (XCONS ((c))->cdr) |
| 630 | #endif | 630 | #endif |
| 631 | 631 | ||
| 632 | /* Okay, we're not quite ready to turn this on yet. A few files still | ||
| 633 | need to be updated and tested. */ | ||
| 634 | #undef LISP_MAKE_RVALUE | ||
| 635 | #define LISP_MAKE_RVALUE(x) (x) | ||
| 636 | |||
| 637 | /* Use these from normal code. */ | 632 | /* Use these from normal code. */ |
| 638 | #define XCAR(c) LISP_MAKE_RVALUE(XCAR_AS_LVALUE(c)) | 633 | #define XCAR(c) LISP_MAKE_RVALUE(XCAR_AS_LVALUE(c)) |
| 639 | #define XCDR(c) LISP_MAKE_RVALUE(XCDR_AS_LVALUE(c)) | 634 | #define XCDR(c) LISP_MAKE_RVALUE(XCDR_AS_LVALUE(c)) |