diff options
| author | Ken Raeburn <raeburn@raeburn.org> | 2001-10-16 09:09:51 +0000 |
|---|---|---|
| committer | Ken Raeburn <raeburn@raeburn.org> | 2001-10-16 09:09:51 +0000 |
| commit | f3fbd1553534bb85c75baf891c0ca9aaa4c3fa6f (patch) | |
| tree | 43eb51ff0ca4af1705387403827ef210098f2da8 /src/ccl.c | |
| parent | 018ba359ab456f6a43f3acea0c15df616aa0ad02 (diff) | |
| download | emacs-f3fbd1553534bb85c75baf891c0ca9aaa4c3fa6f.tar.gz | |
Avoid (most) uses of XCAR/XCDR as lvalues, for flexibility in experimenting
with lisp system changes.
Diffstat (limited to 'src/ccl.c')
| -rw-r--r-- | src/ccl.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/ccl.c b/src/ccl.c index d3879abae6b..52a4ff3c388 100644 --- a/src/ccl.c +++ b/src/ccl.c @@ -2274,7 +2274,7 @@ Return index number of the registered map.") if (EQ (symbol, XCAR (slot))) { index = make_number (i); - XCDR (slot) = map; + XSETCDR (slot, map); Fput (symbol, Qcode_conversion_map, map); Fput (symbol, Qcode_conversion_map_id, index); return index; |