From 28be1ada0fb9a4b51cf361dc45208e764bd34143 Mon Sep 17 00:00:00 2001 From: Dmitry Antipov Date: Tue, 19 Jun 2012 20:56:28 +0400 Subject: * alloc.c, bytecode.c, ccl.c, coding.c, composite.c, data.c, dosfns.c: * font.c, image.c, keyboard.c, lread.c, menu.c, minibuf.c, msdos.c: * print.c, syntax.c, window.c, xmenu.c, xselect.c: Replace direct access to `contents' member of Lisp_Vector objects with AREF and ASET where appropriate. --- src/data.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/data.c') diff --git a/src/data.c b/src/data.c index 2aa27e65d7..ee43b98e6e 100644 --- a/src/data.c +++ b/src/data.c @@ -2134,7 +2134,7 @@ bool-vector. IDX starts at 0. */) { if (idxval < 0 || idxval >= ASIZE (array)) args_out_of_range (array, idx); - XVECTOR (array)->contents[idxval] = newelt; + ASET (array, idxval, newelt); } else if (BOOL_VECTOR_P (array)) { -- cgit v1.2.3