(ASET): Remove definition.
authorGerd Moellmann <gerd@gnu.org>
Thu, 13 Jul 2000 14:06:56 +0000 (14:06 +0000)
committerGerd Moellmann <gerd@gnu.org>
Thu, 13 Jul 2000 14:06:56 +0000 (14:06 +0000)
src/xfaces.c

index 6299d80..30fa8b0 100644 (file)
@@ -2550,8 +2550,6 @@ the face font sort order.")
       Lisp_Object v = Fmake_vector (make_number (8), Qnil);
       char *tem;
 
-#define ASET(VECTOR, IDX, VAL) (XVECTOR (VECTOR)->contents[IDX] = (VAL))
-      
       ASET (v, 0, build_string (fonts[i].fields[XLFD_FAMILY]));
       ASET (v, 1, xlfd_symbolic_swidth (fonts + i));
       ASET (v, 2, make_number (xlfd_point_size (f, fonts + i)));
@@ -2566,8 +2564,6 @@ the face font sort order.")
       xfree (tem);
       
       result = Fcons (v, result);
-      
-#undef ASET
     }
 
   remove_duplicates (result);