Commit d0bfec76 authored by Jason Rumney's avatar Jason Rumney

(uniscribe_check_otf): Rearrange loop for counting features.

parent e38ac6e2
2008-04-04 Jason Rumney <jasonr@gnu.org>
* w32uniscribe.c (uniscribe_check_otf): Fix last change.
(uniscribe_check_otf): Add GC protection before consing.
Rearrange loop for counting features.
2008-04-03 Stefan Monnier <monnier@iro.umontreal.ca>
......
......@@ -612,7 +612,6 @@ int uniscribe_check_otf (font, otf_spec)
unsigned short script_table, langsys_table, n_langs;
unsigned short feature_index, n_features;
DWORD tbl = feature_tables[i];
Lisp_Object feature;
/* Skip if no features requested from this table. */
if (NILP (features[i]))
......@@ -680,10 +679,9 @@ int uniscribe_check_otf (font, otf_spec)
/* Check the features. Features may contain nil according to
documentation in font_prop_validate_otf, so count them. */
n_match_features = 0;
rest = features[i];
for (feature = XCAR (rest); CONSP (rest); feature = CAR_SAFE (rest))
for (rest = features[i]; CONSP (rest); rest = XCDR (rest))
{
rest = XCDR (rest);
Lisp_Object feature = XCAR (rest);
if (!NILP (feature))
n_match_features++;
}
......
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