changeset 91720:929fde6550ca

(ASET): Use AREF, not ASLOT.
author Richard M. Stallman <rms@gnu.org>
date Sun, 10 Feb 2008 14:01:47 +0000
parents 5718a4d5a354
children 558041859d55
files src/lisp.h
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/src/lisp.h	Sun Feb 10 13:10:48 2008 +0000
+++ b/src/lisp.h	Sun Feb 10 14:01:47 2008 +0000
@@ -594,7 +594,7 @@
 #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.  */