1 files changed, 406 insertions, 398 deletions
diff --git a/fontconfig/src/fcdbg.c b/fontconfig/src/fcdbg.c
index fd2d55a6b..b8cb079fc 100644
--- a/fontconfig/src/fcdbg.c
+++ b/fontconfig/src/fcdbg.c
@@ -1,398 +1,406 @@
-/*
- * fontconfig/src/fcdbg.c
- *
- * Copyright © 2000 Keith Packard
- *
- * Permission to use, copy, modify, distribute, and sell this software and its
- * documentation for any purpose is hereby granted without fee, provided that
- * the above copyright notice appear in all copies and that both that
- * copyright notice and this permission notice appear in supporting
- * documentation, and that the name of Keith Packard not be used in
- * advertising or publicity pertaining to distribution of the software without
- * specific, written prior permission.  Keith Packard makes no
- * representations about the suitability of this software for any purpose.  It
- * is provided "as is" without express or implied warranty.
- *
- * THE AUTHOR(S) DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
- * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
- * EVENT SHALL THE AUTHOR(S) BE LIABLE FOR ANY SPECIAL, INDIRECT OR
- * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
- * DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
- * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
- * PERFORMANCE OF THIS SOFTWARE.
- */
-
-#include "fcint.h"
-#include <stdio.h>
-#include <stdlib.h>
-
-void
-FcValuePrint (const FcValue v)
-{
-    switch (v.type) {
-    case FcTypeVoid:
-	printf (" <void>");
-	break;
-    case FcTypeInteger:
-	printf (" %d(i)", v.u.i);
-	break;
-    case FcTypeDouble:
-	printf (" %g(f)", v.u.d);
-	break;
-    case FcTypeString:
-	printf (" \"%s\"", v.u.s);
-	break;
-    case FcTypeBool:
-	printf (" %s", v.u.b ? "FcTrue" : "FcFalse");
-	break;
-    case FcTypeMatrix:
-	printf (" (%f %f; %f %f)", v.u.m->xx, v.u.m->xy, v.u.m->yx, v.u.m->yy);
-	break;
-    case FcTypeCharSet:	/* XXX */
-	printf (" ");
-	FcCharSetPrint (v.u.c);
-	break;
-    case FcTypeLangSet:
-	printf (" ");
-	FcLangSetPrint (v.u.l);
-	break;
-    case FcTypeFTFace:
-	printf (" face");
-	break;
-    }
-}
-
-void
-FcValueListPrint (FcValueListPtr l)
-{
-    for (; l != NULL; l = FcValueListNext(l))
-    {
-	FcValuePrint (FcValueCanonicalize(&l->value));
-	switch (l->binding) {
-	case FcValueBindingWeak:
-	    printf ("(w)");
-	    break;
-	case FcValueBindingStrong:
-	    printf ("(s)");
-	    break;
-	case FcValueBindingSame:
-	    printf ("(=)");
-	    break;
-	}
-    }
-}
-
-void
-FcLangSetPrint (const FcLangSet *ls)
-{
-    FcStrBuf	buf;
-    FcChar8	init_buf[1024];
-    
-    FcStrBufInit (&buf, init_buf, sizeof (init_buf));
-    if (FcNameUnparseLangSet (&buf, ls) && FcStrBufChar (&buf,'\0'))
-       printf ("%s", buf.buf);
-    else
-       printf ("langset (alloc error)");
-    FcStrBufDestroy (&buf);
-}
-
-void
-FcCharSetPrint (const FcCharSet *c)
-{
-    int	i, j;
-    intptr_t	*leaves = FcCharSetLeaves (c);
-    FcChar16	*numbers = FcCharSetNumbers (c);
-    
-#if 0
-    printf ("CharSet  0x%x\n", (intptr_t) c);
-    printf ("Leaves:  +%d = 0x%x\n", c->leaves_offset, (intptr_t) leaves);
-    printf ("Numbers: +%d = 0x%x\n", c->numbers_offset, (intptr_t) numbers);
-    
-    for (i = 0; i < c->num; i++)
-    {
-	printf ("Page %d: %04x +%d = 0x%x\n", 
-		i, numbers[i], leaves[i], 
-		(intptr_t) FcOffsetToPtr (leaves, leaves[i], FcCharLeaf));
-    }
-#endif
-		
-    printf ("\n");
-    for (i = 0; i < c->num; i++)
-    {
-	intptr_t	leaf_offset = leaves[i];
-	FcCharLeaf	*leaf = FcOffsetToPtr (leaves, leaf_offset, FcCharLeaf);
-	
-	printf ("\t");
-	printf ("%04x:", numbers[i]);
-	for (j = 0; j < 256/32; j++)
-	    printf (" %08x", leaf->map[j]);
-	printf ("\n");
-    }
-}
-
-void
-FcPatternPrint (const FcPattern *p)
-{
-    int		    i;
-    FcPatternElt   *e;
-    
-    if (!p)
-    {
-	printf ("Null pattern\n");
-	return;
-    }
-    printf ("Pattern has %d elts (size %d)\n", p->num, p->size);
-    for (i = 0; i < p->num; i++)
-    {
-	e = &FcPatternElts(p)[i];
-	printf ("\t%s:", FcObjectName(e->object));
-	FcValueListPrint (FcPatternEltValues(e));
-	printf ("\n");
-    }
-    printf ("\n");
-}
-
-void
-FcOpPrint (FcOp op)
-{
-    switch (op) {
-    case FcOpInteger: printf ("Integer"); break;
-    case FcOpDouble: printf ("Double"); break;
-    case FcOpString: printf ("String"); break;
-    case FcOpMatrix: printf ("Matrix"); break;
-    case FcOpBool: printf ("Bool"); break;
-    case FcOpCharSet: printf ("CharSet"); break;
-    case FcOpField: printf ("Field"); break;
-    case FcOpConst: printf ("Const"); break;
-    case FcOpAssign: printf ("Assign"); break;
-    case FcOpAssignReplace: printf ("AssignReplace"); break;
-    case FcOpPrepend: printf ("Prepend"); break;
-    case FcOpPrependFirst: printf ("PrependFirst"); break;
-    case FcOpAppend: printf ("Append"); break;
-    case FcOpAppendLast: printf ("AppendLast"); break;
-    case FcOpQuest: printf ("Quest"); break;
-    case FcOpOr: printf ("Or"); break;
-    case FcOpAnd: printf ("And"); break;
-    case FcOpEqual: printf ("Equal"); break;
-    case FcOpNotEqual: printf ("NotEqual"); break;
-    case FcOpLess: printf ("Less"); break;
-    case FcOpLessEqual: printf ("LessEqual"); break;
-    case FcOpMore: printf ("More"); break;
-    case FcOpMoreEqual: printf ("MoreEqual"); break;
-    case FcOpContains: printf ("Contains"); break;
-    case FcOpNotContains: printf ("NotContains"); break;
-    case FcOpPlus: printf ("Plus"); break;
-    case FcOpMinus: printf ("Minus"); break;
-    case FcOpTimes: printf ("Times"); break;
-    case FcOpDivide: printf ("Divide"); break;
-    case FcOpNot: printf ("Not"); break;
-    case FcOpNil: printf ("Nil"); break;
-    case FcOpComma: printf ("Comma"); break;
-    case FcOpFloor: printf ("Floor"); break;
-    case FcOpCeil: printf ("Ceil"); break;
-    case FcOpRound: printf ("Round"); break;
-    case FcOpTrunc: printf ("Trunc"); break;
-    case FcOpListing: printf ("Listing"); break;
-    case FcOpInvalid: printf ("Invalid"); break;
-    }
-}
-
-void
-FcExprPrint (const FcExpr *expr)
-{
-    if (!expr) printf ("none");
-    else switch (expr->op) {
-    case FcOpInteger: printf ("%d", expr->u.ival); break;
-    case FcOpDouble: printf ("%g", expr->u.dval); break;
-    case FcOpString: printf ("\"%s\"", expr->u.sval); break;
-    case FcOpMatrix: printf ("[%g %g %g %g]",
-			      expr->u.mval->xx,
-			      expr->u.mval->xy,
-			      expr->u.mval->yx,
-			      expr->u.mval->yy); break;
-    case FcOpBool: printf ("%s", expr->u.bval ? "true" : "false"); break;
-    case FcOpCharSet: printf ("charset\n"); break;
-    case FcOpNil: printf ("nil\n"); break;
-    case FcOpField: printf ("%s", FcObjectName(expr->u.object)); break;
-    case FcOpConst: printf ("%s", expr->u.constant); break;
-    case FcOpQuest:
-	FcExprPrint (expr->u.tree.left);
-	printf (" quest ");
-	FcExprPrint (expr->u.tree.right->u.tree.left);
-	printf (" colon ");
-	FcExprPrint (expr->u.tree.right->u.tree.right);
-	break;
-    case FcOpAssign:
-    case FcOpAssignReplace:
-    case FcOpPrependFirst:
-    case FcOpPrepend:
-    case FcOpAppend:
-    case FcOpAppendLast:
-    case FcOpOr:
-    case FcOpAnd:
-    case FcOpEqual:
-    case FcOpNotEqual:
-    case FcOpLess:
-    case FcOpLessEqual:
-    case FcOpMore:
-    case FcOpMoreEqual:
-    case FcOpContains:
-    case FcOpListing:
-    case FcOpNotContains:
-    case FcOpPlus:
-    case FcOpMinus:
-    case FcOpTimes:
-    case FcOpDivide:
-    case FcOpComma:
-	FcExprPrint (expr->u.tree.left);
-	printf (" ");
-	switch (expr->op) {
-	case FcOpAssign: printf ("Assign"); break;
-	case FcOpAssignReplace: printf ("AssignReplace"); break;
-	case FcOpPrependFirst: printf ("PrependFirst"); break;
-	case FcOpPrepend: printf ("Prepend"); break;
-	case FcOpAppend: printf ("Append"); break;
-	case FcOpAppendLast: printf ("AppendLast"); break;
-	case FcOpOr: printf ("Or"); break;
-	case FcOpAnd: printf ("And"); break;
-	case FcOpEqual: printf ("Equal"); break;
-	case FcOpNotEqual: printf ("NotEqual"); break;
-	case FcOpLess: printf ("Less"); break;
-	case FcOpLessEqual: printf ("LessEqual"); break;
-	case FcOpMore: printf ("More"); break;
-	case FcOpMoreEqual: printf ("MoreEqual"); break;
-	case FcOpContains: printf ("Contains"); break;
-	case FcOpListing: printf ("Listing"); break;
-	case FcOpNotContains: printf ("NotContains"); break;
-	case FcOpPlus: printf ("Plus"); break;
-	case FcOpMinus: printf ("Minus"); break;
-	case FcOpTimes: printf ("Times"); break;
-	case FcOpDivide: printf ("Divide"); break;
-	case FcOpComma: printf ("Comma"); break;
-	default: break;
-	}
-	printf (" ");
-	FcExprPrint (expr->u.tree.right);
-	break;
-    case FcOpNot:
-	printf ("Not ");
-	FcExprPrint (expr->u.tree.left);
-	break;
-    case FcOpFloor:
-	printf ("Floor ");
-	FcExprPrint (expr->u.tree.left);
-	break;
-    case FcOpCeil:
-	printf ("Ceil ");
-	FcExprPrint (expr->u.tree.left);
-	break;
-    case FcOpRound:
-	printf ("Round ");
-	FcExprPrint (expr->u.tree.left);
-	break;
-    case FcOpTrunc:
-	printf ("Trunc ");
-	FcExprPrint (expr->u.tree.left);
-	break;
-    case FcOpInvalid: printf ("Invalid"); break;
-    }
-}
-
-void
-FcTestPrint (const FcTest *test)
-{
-    switch (test->kind) {
-    case FcMatchPattern:
-	printf ("pattern ");
-	break;
-    case FcMatchFont:
-	printf ("font ");
-	break;
-    case FcMatchScan:
-	printf ("scan ");
-	break;
-    }
-    switch (test->qual) {
-    case FcQualAny:
-	printf ("any ");
-	break;
-    case FcQualAll:
-	printf ("all ");
-	break;
-    case FcQualFirst:
-	printf ("first ");
-	break;
-    case FcQualNotFirst:
-	printf ("not_first ");
-	break;
-    }
-    printf ("%s ", FcObjectName (test->object));
-    FcOpPrint (test->op);
-    printf (" ");
-    FcExprPrint (test->expr);
-    printf ("\n");
-}
-
-void
-FcEditPrint (const FcEdit *edit)
-{
-    printf ("Edit %s ", FcObjectName (edit->object));
-    FcOpPrint (edit->op);
-    printf (" ");
-    FcExprPrint (edit->expr);
-}
-
-void
-FcSubstPrint (const FcSubst *subst)
-{
-    FcEdit	*e;
-    FcTest	*t;
-    
-    printf ("match\n");
-    for (t = subst->test; t; t = t->next)
-    {
-	printf ("\t");
-	FcTestPrint (t);
-    }
-    printf ("edit\n");
-    for (e = subst->edit; e; e = e->next)
-    {
-	printf ("\t");
-	FcEditPrint (e);
-	printf (";\n");
-    }
-    printf ("\n");
-}
-
-void
-FcFontSetPrint (const FcFontSet *s)
-{
-    int	    i;
-
-    printf ("FontSet %d of %d\n", s->nfont, s->sfont);
-    for (i = 0; i < s->nfont; i++)
-    {
-	printf ("Font %d ", i);
-	FcPatternPrint (s->fonts[i]);
-    }
-}
-
-int FcDebugVal;
-
-void
-FcInitDebug (void)
-{
-    char    *e;
-
-    e = getenv ("FC_DEBUG");
-    if (e)
-    {
-        printf ("FC_DEBUG=%s\n", e);
-        FcDebugVal = atoi (e);
-        if (FcDebugVal < 0)
-   	    FcDebugVal = 0;
-    }
-}
-#define __fcdbg__
-#include "fcaliastail.h"
-#undef __fcdbg__
+/*
+ * fontconfig/src/fcdbg.c
+ *
+ * Copyright © 2000 Keith Packard
+ *
+ * Permission to use, copy, modify, distribute, and sell this software and its
+ * documentation for any purpose is hereby granted without fee, provided that
+ * the above copyright notice appear in all copies and that both that
+ * copyright notice and this permission notice appear in supporting
+ * documentation, and that the name of the author(s) not be used in
+ * advertising or publicity pertaining to distribution of the software without
+ * specific, written prior permission.  The authors make no
+ * representations about the suitability of this software for any purpose.  It
+ * is provided "as is" without express or implied warranty.
+ *
+ * THE AUTHOR(S) DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+ * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+ * EVENT SHALL THE AUTHOR(S) BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+ * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
+ * DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
+ * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+ * PERFORMANCE OF THIS SOFTWARE.
+ */
+
+#include "fcint.h"
+#include <stdio.h>
+#include <stdlib.h>
+
+void
+FcValuePrint (const FcValue v)
+{
+    switch (v.type) {
+    case FcTypeVoid:
+	printf (" <void>");
+	break;
+    case FcTypeInteger:
+	printf (" %d(i)", v.u.i);
+	break;
+    case FcTypeDouble:
+	printf (" %g(f)", v.u.d);
+	break;
+    case FcTypeString:
+	printf (" \"%s\"", v.u.s);
+	break;
+    case FcTypeBool:
+	printf (" %s", v.u.b ? "FcTrue" : "FcFalse");
+	break;
+    case FcTypeMatrix:
+	printf (" (%f %f; %f %f)", v.u.m->xx, v.u.m->xy, v.u.m->yx, v.u.m->yy);
+	break;
+    case FcTypeCharSet:	/* XXX */
+	printf (" ");
+	FcCharSetPrint (v.u.c);
+	break;
+    case FcTypeLangSet:
+	printf (" ");
+	FcLangSetPrint (v.u.l);
+	break;
+    case FcTypeFTFace:
+	printf (" face");
+	break;
+    }
+}
+
+void
+FcValueListPrint (FcValueListPtr l)
+{
+    for (; l != NULL; l = FcValueListNext(l))
+    {
+	FcValuePrint (FcValueCanonicalize(&l->value));
+	switch (l->binding) {
+	case FcValueBindingWeak:
+	    printf ("(w)");
+	    break;
+	case FcValueBindingStrong:
+	    printf ("(s)");
+	    break;
+	case FcValueBindingSame:
+	    printf ("(=)");
+	    break;
+	}
+    }
+}
+
+void
+FcLangSetPrint (const FcLangSet *ls)
+{
+    FcStrBuf	buf;
+    FcChar8	init_buf[1024];
+
+    FcStrBufInit (&buf, init_buf, sizeof (init_buf));
+    if (FcNameUnparseLangSet (&buf, ls) && FcStrBufChar (&buf,'\0'))
+       printf ("%s", buf.buf);
+    else
+       printf ("langset (alloc error)");
+    FcStrBufDestroy (&buf);
+}
+
+void
+FcCharSetPrint (const FcCharSet *c)
+{
+    int	i, j;
+    intptr_t	*leaves = FcCharSetLeaves (c);
+    FcChar16	*numbers = FcCharSetNumbers (c);
+
+#if 0
+    printf ("CharSet  0x%x\n", (intptr_t) c);
+    printf ("Leaves:  +%d = 0x%x\n", c->leaves_offset, (intptr_t) leaves);
+    printf ("Numbers: +%d = 0x%x\n", c->numbers_offset, (intptr_t) numbers);
+
+    for (i = 0; i < c->num; i++)
+    {
+	printf ("Page %d: %04x +%d = 0x%x\n",
+		i, numbers[i], leaves[i],
+		(intptr_t) FcOffsetToPtr (leaves, leaves[i], FcCharLeaf));
+    }
+#endif
+		
+    printf ("\n");
+    for (i = 0; i < c->num; i++)
+    {
+	intptr_t	leaf_offset = leaves[i];
+	FcCharLeaf	*leaf = FcOffsetToPtr (leaves, leaf_offset, FcCharLeaf);
+	
+	printf ("\t");
+	printf ("%04x:", numbers[i]);
+	for (j = 0; j < 256/32; j++)
+	    printf (" %08x", leaf->map[j]);
+	printf ("\n");
+    }
+}
+
+void
+FcPatternPrint (const FcPattern *p)
+{
+    int		    i;
+    FcPatternElt   *e;
+
+    if (!p)
+    {
+	printf ("Null pattern\n");
+	return;
+    }
+    printf ("Pattern has %d elts (size %d)\n", p->num, p->size);
+    for (i = 0; i < p->num; i++)
+    {
+	e = &FcPatternElts(p)[i];
+	printf ("\t%s:", FcObjectName(e->object));
+	FcValueListPrint (FcPatternEltValues(e));
+	printf ("\n");
+    }
+    printf ("\n");
+}
+
+void
+FcOpPrint (FcOp op)
+{
+    switch (op) {
+    case FcOpInteger: printf ("Integer"); break;
+    case FcOpDouble: printf ("Double"); break;
+    case FcOpString: printf ("String"); break;
+    case FcOpMatrix: printf ("Matrix"); break;
+    case FcOpRange: printf ("Range"); break;
+    case FcOpBool: printf ("Bool"); break;
+    case FcOpCharSet: printf ("CharSet"); break;
+    case FcOpLangSet: printf ("LangSet"); break;
+    case FcOpField: printf ("Field"); break;
+    case FcOpConst: printf ("Const"); break;
+    case FcOpAssign: printf ("Assign"); break;
+    case FcOpAssignReplace: printf ("AssignReplace"); break;
+    case FcOpPrepend: printf ("Prepend"); break;
+    case FcOpPrependFirst: printf ("PrependFirst"); break;
+    case FcOpAppend: printf ("Append"); break;
+    case FcOpAppendLast: printf ("AppendLast"); break;
+    case FcOpQuest: printf ("Quest"); break;
+    case FcOpOr: printf ("Or"); break;
+    case FcOpAnd: printf ("And"); break;
+    case FcOpEqual: printf ("Equal"); break;
+    case FcOpNotEqual: printf ("NotEqual"); break;
+    case FcOpLess: printf ("Less"); break;
+    case FcOpLessEqual: printf ("LessEqual"); break;
+    case FcOpMore: printf ("More"); break;
+    case FcOpMoreEqual: printf ("MoreEqual"); break;
+    case FcOpContains: printf ("Contains"); break;
+    case FcOpNotContains: printf ("NotContains"); break;
+    case FcOpPlus: printf ("Plus"); break;
+    case FcOpMinus: printf ("Minus"); break;
+    case FcOpTimes: printf ("Times"); break;
+    case FcOpDivide: printf ("Divide"); break;
+    case FcOpNot: printf ("Not"); break;
+    case FcOpNil: printf ("Nil"); break;
+    case FcOpComma: printf ("Comma"); break;
+    case FcOpFloor: printf ("Floor"); break;
+    case FcOpCeil: printf ("Ceil"); break;
+    case FcOpRound: printf ("Round"); break;
+    case FcOpTrunc: printf ("Trunc"); break;
+    case FcOpListing: printf ("Listing"); break;
+    case FcOpInvalid: printf ("Invalid"); break;
+    }
+}
+
+void
+FcExprPrint (const FcExpr *expr)
+{
+    if (!expr) printf ("none");
+    else switch (expr->op) {
+    case FcOpInteger: printf ("%d", expr->u.ival); break;
+    case FcOpDouble: printf ("%g", expr->u.dval); break;
+    case FcOpString: printf ("\"%s\"", expr->u.sval); break;
+    case FcOpMatrix: printf ("[%g %g %g %g]",
+			      expr->u.mval->xx,
+			      expr->u.mval->xy,
+			      expr->u.mval->yx,
+			      expr->u.mval->yy); break;
+    case FcOpRange: break;
+    case FcOpBool: printf ("%s", expr->u.bval ? "true" : "false"); break;
+    case FcOpCharSet: printf ("charset\n"); break;
+    case FcOpLangSet:
+	printf ("langset:");
+	FcLangSetPrint(expr->u.lval);
+	printf ("\n");
+	break;
+    case FcOpNil: printf ("nil\n"); break;
+    case FcOpField: printf ("%s", FcObjectName(expr->u.object)); break;
+    case FcOpConst: printf ("%s", expr->u.constant); break;
+    case FcOpQuest:
+	FcExprPrint (expr->u.tree.left);
+	printf (" quest ");
+	FcExprPrint (expr->u.tree.right->u.tree.left);
+	printf (" colon ");
+	FcExprPrint (expr->u.tree.right->u.tree.right);
+	break;
+    case FcOpAssign:
+    case FcOpAssignReplace:
+    case FcOpPrependFirst:
+    case FcOpPrepend:
+    case FcOpAppend:
+    case FcOpAppendLast:
+    case FcOpOr:
+    case FcOpAnd:
+    case FcOpEqual:
+    case FcOpNotEqual:
+    case FcOpLess:
+    case FcOpLessEqual:
+    case FcOpMore:
+    case FcOpMoreEqual:
+    case FcOpContains:
+    case FcOpListing:
+    case FcOpNotContains:
+    case FcOpPlus:
+    case FcOpMinus:
+    case FcOpTimes:
+    case FcOpDivide:
+    case FcOpComma:
+	FcExprPrint (expr->u.tree.left);
+	printf (" ");
+	switch (expr->op) {
+	case FcOpAssign: printf ("Assign"); break;
+	case FcOpAssignReplace: printf ("AssignReplace"); break;
+	case FcOpPrependFirst: printf ("PrependFirst"); break;
+	case FcOpPrepend: printf ("Prepend"); break;
+	case FcOpAppend: printf ("Append"); break;
+	case FcOpAppendLast: printf ("AppendLast"); break;
+	case FcOpOr: printf ("Or"); break;
+	case FcOpAnd: printf ("And"); break;
+	case FcOpEqual: printf ("Equal"); break;
+	case FcOpNotEqual: printf ("NotEqual"); break;
+	case FcOpLess: printf ("Less"); break;
+	case FcOpLessEqual: printf ("LessEqual"); break;
+	case FcOpMore: printf ("More"); break;
+	case FcOpMoreEqual: printf ("MoreEqual"); break;
+	case FcOpContains: printf ("Contains"); break;
+	case FcOpListing: printf ("Listing"); break;
+	case FcOpNotContains: printf ("NotContains"); break;
+	case FcOpPlus: printf ("Plus"); break;
+	case FcOpMinus: printf ("Minus"); break;
+	case FcOpTimes: printf ("Times"); break;
+	case FcOpDivide: printf ("Divide"); break;
+	case FcOpComma: printf ("Comma"); break;
+	default: break;
+	}
+	printf (" ");
+	FcExprPrint (expr->u.tree.right);
+	break;
+    case FcOpNot:
+	printf ("Not ");
+	FcExprPrint (expr->u.tree.left);
+	break;
+    case FcOpFloor:
+	printf ("Floor ");
+	FcExprPrint (expr->u.tree.left);
+	break;
+    case FcOpCeil:
+	printf ("Ceil ");
+	FcExprPrint (expr->u.tree.left);
+	break;
+    case FcOpRound:
+	printf ("Round ");
+	FcExprPrint (expr->u.tree.left);
+	break;
+    case FcOpTrunc:
+	printf ("Trunc ");
+	FcExprPrint (expr->u.tree.left);
+	break;
+    case FcOpInvalid: printf ("Invalid"); break;
+    }
+}
+
+void
+FcTestPrint (const FcTest *test)
+{
+    switch (test->kind) {
+    case FcMatchPattern:
+	printf ("pattern ");
+	break;
+    case FcMatchFont:
+	printf ("font ");
+	break;
+    case FcMatchScan:
+	printf ("scan ");
+	break;
+    }
+    switch (test->qual) {
+    case FcQualAny:
+	printf ("any ");
+	break;
+    case FcQualAll:
+	printf ("all ");
+	break;
+    case FcQualFirst:
+	printf ("first ");
+	break;
+    case FcQualNotFirst:
+	printf ("not_first ");
+	break;
+    }
+    printf ("%s ", FcObjectName (test->object));
+    FcOpPrint (test->op);
+    printf (" ");
+    FcExprPrint (test->expr);
+    printf ("\n");
+}
+
+void
+FcEditPrint (const FcEdit *edit)
+{
+    printf ("Edit %s ", FcObjectName (edit->object));
+    FcOpPrint (edit->op);
+    printf (" ");
+    FcExprPrint (edit->expr);
+}
+
+void
+FcSubstPrint (const FcSubst *subst)
+{
+    FcEdit	*e;
+    FcTest	*t;
+
+    printf ("match\n");
+    for (t = subst->test; t; t = t->next)
+    {
+	printf ("\t");
+	FcTestPrint (t);
+    }
+    printf ("edit\n");
+    for (e = subst->edit; e; e = e->next)
+    {
+	printf ("\t");
+	FcEditPrint (e);
+	printf (";\n");
+    }
+    printf ("\n");
+}
+
+void
+FcFontSetPrint (const FcFontSet *s)
+{
+    int	    i;
+
+    printf ("FontSet %d of %d\n", s->nfont, s->sfont);
+    for (i = 0; i < s->nfont; i++)
+    {
+	printf ("Font %d ", i);
+	FcPatternPrint (s->fonts[i]);
+    }
+}
+
+int FcDebugVal;
+
+void
+FcInitDebug (void)
+{
+    char    *e;
+
+    e = getenv ("FC_DEBUG");
+    if (e)
+    {
+        printf ("FC_DEBUG=%s\n", e);
+        FcDebugVal = atoi (e);
+        if (FcDebugVal < 0)
+   	    FcDebugVal = 0;
+    }
+}
+#define __fcdbg__
+#include "fcaliastail.h"
+#undef __fcdbg__