-
/*
* IR toolkit for tcl/tk
- * (c) Index Data 1995
+ * (c) Index Data 1995-1999
* See the file LICENSE for details.
* Sebastian Hammer, Adam Dickmeiss
*
* $Log: queue.c,v $
- * Revision 1.11 1996-07-03 13:31:14 adam
+ * Revision 1.13 2003-03-05 21:21:42 adam
+ * APDU log. default largeSetLowerBound changed from 2 to 1
+ *
+ * Revision 1.12 1999/04/20 10:01:46 adam
+ * Modified calls to ODR encoders/decoders (name argument).
+ *
+ * Revision 1.11 1996/07/03 13:31:14 adam
* The xmalloc/xfree functions from YAZ are used to manage memory.
*
* Revision 1.10 1996/06/03 09:04:24 adam
{
IrTcl_Request **rp;
- if (!z_APDU (p->odr_out, &apdu, 0))
+ if (!z_APDU (p->odr_out, &apdu, 0, 0))
{
Tcl_AppendResult (interp, odr_errmsg (odr_geterror (p->odr_out)),
NULL);
odr_reset (p->odr_out);
return TCL_ERROR;
}
+ if (p->odr_pr)
+ z_APDU (p->odr_pr, &apdu, 0, 0);
rp = &p->request_queue;
while (*rp)
rp = &(*rp)->next;