projects
/
ir-tcl-moved-to-github.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Added Explain documentaion.
[ir-tcl-moved-to-github.git]
/
ir-tcl.c
diff --git
a/ir-tcl.c
b/ir-tcl.c
index
ad3fba6
..
973df4c
100644
(file)
--- a/
ir-tcl.c
+++ b/
ir-tcl.c
@@
-5,7
+5,10
@@
* Sebastian Hammer, Adam Dickmeiss
*
* $Log: ir-tcl.c,v $
* Sebastian Hammer, Adam Dickmeiss
*
* $Log: ir-tcl.c,v $
- * Revision 1.96 1996-10-08 13:02:50 adam
+ * Revision 1.97 1996-11-14 17:11:07 adam
+ * Added Explain documentaion.
+ *
+ * Revision 1.96 1996/10/08 13:02:50 adam
* When dealing with records, odr_choice_enable_bias function is used to
* prevent decoding of externals.
*
* When dealing with records, odr_choice_enable_bias function is used to
* prevent decoding of externals.
*
@@
-3453,7
+3456,7
@@
static void ir_handleDBRecord (IrTcl_Obj *p, IrTcl_RecordList *rl,
switch (etype->what)
{
case Z_External_sutrs:
switch (etype->what)
{
case Z_External_sutrs:
- logf (LOG_LOG, "Z_External_sutrs");
+ logf (LOG_DEBUG, "Z_External_sutrs");
oe->u.sutrs = rr;
if ((rl->u.dbrec.buf = ir_tcl_malloc (oe->u.sutrs->len+1)))
{
oe->u.sutrs = rr;
if ((rl->u.dbrec.buf = ir_tcl_malloc (oe->u.sutrs->len+1)))
{
@@
-3464,12
+3467,12
@@
static void ir_handleDBRecord (IrTcl_Obj *p, IrTcl_RecordList *rl,
rl->u.dbrec.size = oe->u.sutrs->len;
break;
case Z_External_grs1:
rl->u.dbrec.size = oe->u.sutrs->len;
break;
case Z_External_grs1:
- logf (LOG_LOG, "Z_External_grs1");
+ logf (LOG_DEBUG, "Z_External_grs1");
oe->u.grs1 = rr;
ir_tcl_grs_mk (oe->u.grs1, &rl->u.dbrec.u.grs1);
break;
case Z_External_explainRecord:
oe->u.grs1 = rr;
ir_tcl_grs_mk (oe->u.grs1, &rl->u.dbrec.u.grs1);
break;
case Z_External_explainRecord:
- logf (LOG_LOG, "Z_External_explainRecord");
+ logf (LOG_DEBUG, "Z_External_explainRecord");
if ((rl->u.dbrec.buf = ir_tcl_malloc (rl->u.dbrec.size)))
{
memcpy (rl->u.dbrec.buf, oe->u.octet_aligned->buf,
if ((rl->u.dbrec.buf = ir_tcl_malloc (rl->u.dbrec.size)))
{
memcpy (rl->u.dbrec.buf, oe->u.octet_aligned->buf,