Commit e8455367 authored by Richard M. Stallman's avatar Richard M. Stallman

(ASET): Use AREF, not ASLOT.

parent b53f8f91
2008-02-10 Richard Stallman <rms@gnu.org>
* lisp.h (ASET): Use AREF, not ASLOT.
2008-02-10 Stefan Monnier <monnier@iro.umontreal.ca>
* lisp.h (ASET): Check bounds.
......
......@@ -594,7 +594,7 @@ extern size_t pure_size;
#define ASET(ARRAY, IDX, VAL) \
(eassert ((IDX) == (IDX)), \
eassert ((IDX) >= 0 && (IDX) < ASIZE (ARRAY)), \
ASLOT ((ARRAY), (IDX)) = (VAL))
AREF ((ARRAY), (IDX)) = (VAL))
/* Convenience macros for dealing with Lisp strings. */
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment