-/*
+ /*
* Copyright (c) 1995, Index Data
* See the file LICENSE for details.
* Sebastian Hammer, Adam Dickmeiss
*
* $Log: proto.c,v $
- * Revision 1.49 1996-07-06 19:58:28 quinn
+ * Revision 1.52 1996-10-08 12:56:57 adam
+ * Bug fix: tagging of type 101 query.
+ *
+ * Revision 1.51 1996/07/26 14:07:21 quinn
+ * Small
+ *
+ * Revision 1.50 1996/07/26 13:36:15 quinn
+ * Various smallish
+ *
+ * Revision 1.49 1996/07/06 19:58:28 quinn
* System headerfiles gathered in yconfig
*
* Revision 1.48 1996/06/10 08:53:33 quinn
if (!odr_sequence_begin(o, p, sizeof(**p)))
return opt && odr_ok(o);
return
- odr_explicit(o, odr_visiblestring, &(*p)->unitSystem, ODR_CONTEXT,
+ odr_explicit(o, z_InternationalString, &(*p)->unitSystem, ODR_CONTEXT,
1, 1) &&
odr_explicit(o, z_StringOrNumeric, &(*p)->unitType, ODR_CONTEXT,
2, 1) &&
{
{ODR_IMPLICIT, ODR_CONTEXT, 1, Z_Query_type_1, z_RPNQuery},
{ODR_EXPLICIT, ODR_CONTEXT, 2, Z_Query_type_2, odr_octetstring},
- {ODR_EXPLICIT, ODR_CONTEXT, 101, Z_Query_type_101, z_RPNQuery},
+ {ODR_IMPLICIT, ODR_CONTEXT, 101, Z_Query_type_101, z_RPNQuery},
{-1, -1, -1, -1, 0}
};
if (o->direction == ODR_DECODE)
*p = odr_malloc(o, sizeof(**p));
+ odr_setlenlen(o, 5);
if (!odr_choice(o, arm, &(*p)->u, &(*p)->which))
{
if (o->direction == ODR_DECODE)