svn merge ^/branches/released .

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__