X-Git-Url: http://lists.indexdata.com/cgi-bin?a=blobdiff_plain;f=explain.c;h=072b48f4c2aca59b15cb31262e7f86221919bf78;hb=4b0a2dcc8145c6b721a23c2a9bfe9f3f9596fb5a;hp=be59d5f62bb46e89869731c4832ac0022ed2b438;hpb=ccb0e753628e08a767b808487e5702f919edd351;p=ir-tcl-moved-to-github.git diff --git a/explain.c b/explain.c index be59d5f..072b48f 100644 --- a/explain.c +++ b/explain.c @@ -5,7 +5,13 @@ * Sebastian Hammer, Adam Dickmeiss * * $Log: explain.c,v $ - * Revision 1.5 1996-08-23 11:59:47 adam + * Revision 1.7 1997-08-28 20:17:36 adam + * Fixed small bug. + * + * Revision 1.6 1997/05/14 06:57:14 adam + * Adopted to use YAZ with C++ support. + * + * Revision 1.5 1996/08/23 11:59:47 adam * Bug fix: infinite look in ir_oid. * * Revision 1.4 1996/08/22 13:39:31 adam @@ -1280,7 +1286,7 @@ static int ir_QueryTypeDetails (IrExpArg *iea, if (!ir_match_start (name, p, iea, ++argi)) return TCL_OK; - ir_choice (iea, arm, &p->which, p->u.private, argi); + ir_choice (iea, arm, &p->which, p->u.zprivate, argi); return ir_match_end (name, iea, argi); } @@ -1354,7 +1360,7 @@ static int ir_ProxSupportUnit (IrExpArg *iea, { NULL, 0, NULL }}; if (!ir_match_start (name, p, iea, ++argi)) return TCL_OK; - ir_choice (iea, arm, &p->which, p->u.private, argi); + ir_choice (iea, arm, &p->which, p->u.zprivate, argi); return ir_match_end (name, iea, argi); } @@ -1506,7 +1512,7 @@ static int ir_AttributeOccurrence (IrExpArg *iea, ir_oid (iea, p->attributeSet, "attributeSet", argi); ir_integer (iea, p->attributeType, "attributeType", argi); ir_null (iea, p->mustBeSupplied, "mustBeSupplied", argi); - ir_choice (iea, arm, &p->which, p->attributeValues->anyOrNone, argi); + ir_choice (iea, arm, &p->which, p->attributeValues.anyOrNone, argi); return ir_match_end (name, iea, argi); }