Synchronised line endinge with release branch

1 files changed, 406 insertions, 406 deletions

diff --git a/fontconfig/src/fcdbg.c b/fontconfig/src/fcdbg.c
index b8cb079fc..cf2ff0870 100644
--- a/fontconfig/src/fcdbg.c
+++ b/fontconfig/src/fcdbg.c
@@ -1,406 +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 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__

+/*
+ * 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__