User: eric
Date: 05/02/09 13:53:07
Modified: xemacs/src Tag: sjt-xft ChangeLog xft-fonts.c
Log:
use loop macro in string_list_to_fcobjectset()
Revision Changes Path
No revision
No revision
1.758.2.6 +5 -0 XEmacs/xemacs/src/ChangeLog
Index: ChangeLog
===================================================================
RCS file: /pack/xemacscvs/XEmacs/xemacs/src/ChangeLog,v
retrieving revision 1.758.2.5
retrieving revision 1.758.2.6
diff -u -r1.758.2.5 -r1.758.2.6
--- ChangeLog 2005/02/04 16:05:30 1.758.2.5
+++ ChangeLog 2005/02/09 12:53:01 1.758.2.6
@@ -1,3 +1,8 @@
+2005-02-09 Eric Knauel <eric(a)xemacs.org>
+
+ * xft-fonts.c (string_list_to_fcobjectset): Use loop macro instead
+ of for.
+
2005-02-03 Eric Knauel <eric(a)xemacs.org>
* lrecord.h (enum lrecord_type): remove lrecord for FcObjectSets
1.1.2.4 +3 -5 XEmacs/xemacs/src/Attic/xft-fonts.c
Index: xft-fonts.c
===================================================================
RCS file: /pack/xemacscvs/XEmacs/xemacs/src/Attic/xft-fonts.c,v
retrieving revision 1.1.2.3
retrieving revision 1.1.2.4
diff -u -r1.1.2.3 -r1.1.2.4
--- xft-fonts.c 2005/02/04 16:05:38 1.1.2.3
+++ xft-fonts.c 2005/02/09 12:53:04 1.1.2.4
@@ -1003,12 +1003,10 @@
static void
string_list_to_fcobjectset (Lisp_Object list, FcObjectSet *os)
{
- Lisp_Object i;
-
- for (i = list; !NILP (i); i = XCDR (i))
+ EXTERNAL_LIST_LOOP_2 (elt, list)
{
- CHECK_STRING (XCAR (i));
- FcObjectSetAdd (os, XSTRING_DATA (XCAR (i)));
+ CHECK_STRING (elt);
+ FcObjectSetAdd (os, XSTRING_DATA (elt));
}
}