From: Adam Dickmeiss Date: Mon, 29 Jan 1996 11:35:17 +0000 (+0000) Subject: Bug fix: cs_type member renamed to comstackType to avoid conflict with X-Git-Tag: IRTCL.1.4~156 X-Git-Url: http://git.indexdata.com/?a=commitdiff_plain;h=2563fe310b913cb85d82c641f81361214e24384c;p=ir-tcl-moved-to-github.git Bug fix: cs_type member renamed to comstackType to avoid conflict with cs_type macro defined by YAZ. --- diff --git a/CHANGELOG b/CHANGELOG index c638382..bce844d 100644 --- a/CHANGELOG +++ b/CHANGELOG @@ -1,4 +1,4 @@ -$Id: CHANGELOG,v 1.13 1996-01-22 09:28:57 adam Exp $ +$Id: CHANGELOG,v 1.14 1996-01-29 11:35:17 adam Exp $ 06/19/95 Release of ir-tcl-1.0b ------------------------------------------------------ @@ -74,4 +74,7 @@ $Id: CHANGELOG,v 1.13 1996-01-22 09:28:57 adam Exp $ 19/01/96 Bug fix: When running in Windows NT/95 displayFormats wasn't properly read from the subdirectory formats. +29/01/96 Bug fix: cs_type member in ir-tclp.h renamed to comstackType to + avoid conflict with cs_type macro defined by YAZ. + diff --git a/ir-tcl.c b/ir-tcl.c index 1772c66..3c6de3b 100644 --- a/ir-tcl.c +++ b/ir-tcl.c @@ -5,7 +5,11 @@ * Sebastian Hammer, Adam Dickmeiss * * $Log: ir-tcl.c,v $ - * Revision 1.72 1996-01-19 17:45:34 quinn + * Revision 1.73 1996-01-29 11:35:19 adam + * Bug fix: cs_type member renamed to comstackType to avoid conflict with + * cs_type macro defined by YAZ. + * + * Revision 1.72 1996/01/19 17:45:34 quinn * Added debugging output * * Revision 1.71 1996/01/19 16:22:38 adam @@ -1021,7 +1025,7 @@ static int do_connect (void *obj, Tcl_Interp *interp, } if (ir_tcl_strdup (interp, &p->hostname, argv[2]) == TCL_ERROR) return TCL_ERROR; - if (!strcmp (p->cs_type, "tcpip")) + if (!strcmp (p->comstackType, "tcpip")) { p->cs_link = cs_create (tcpip_type, CS_BLOCK, p->protocol_type); addr = tcpip_strtoaddr (argv[2]); @@ -1032,7 +1036,7 @@ static int do_connect (void *obj, Tcl_Interp *interp, } logf (LOG_DEBUG, "tcp/ip connect %s", argv[2]); } - else if (!strcmp (p->cs_type, "mosi")) + else if (!strcmp (p->comstackType, "mosi")) { #if MOSI p->cs_link = cs_create (mosi_type, CS_BLOCK, p->protocol_type); @@ -1051,7 +1055,7 @@ static int do_connect (void *obj, Tcl_Interp *interp, else { Tcl_AppendResult (interp, "Bad comstack type: ", - p->cs_type, NULL); + p->comstackType, NULL); return TCL_ERROR; } if ((r=cs_connect (p->cs_link, addr)) < 0) @@ -1135,16 +1139,16 @@ static int do_comstack (void *o, Tcl_Interp *interp, IrTcl_Obj *obj = o; if (argc == 0) - return ir_tcl_strdup (interp, &obj->cs_type, "tcpip"); + return ir_tcl_strdup (interp, &obj->comstackType, "tcpip"); else if (argc == -1) - return ir_tcl_strdel (interp, &obj->cs_type); + return ir_tcl_strdel (interp, &obj->comstackType); else if (argc == 3) { - free (obj->cs_type); - if (ir_tcl_strdup (interp, &obj->cs_type, argv[2]) == TCL_ERROR) + free (obj->comstackType); + if (ir_tcl_strdup (interp, &obj->comstackType, argv[2]) == TCL_ERROR) return TCL_ERROR; } - Tcl_AppendElement (interp, obj->cs_type); + Tcl_AppendElement (interp, obj->comstackType); return TCL_OK; } diff --git a/ir-tclp.h b/ir-tclp.h index a2c6b89..72a417f 100644 --- a/ir-tclp.h +++ b/ir-tclp.h @@ -5,7 +5,11 @@ * Sebastian Hammer, Adam Dickmeiss * * $Log: ir-tclp.h,v $ - * Revision 1.23 1996-01-19 16:22:40 adam + * Revision 1.24 1996-01-29 11:35:27 adam + * Bug fix: cs_type member renamed to comstackType to avoid conflict with + * cs_type macro defined by YAZ. + * + * Revision 1.23 1996/01/19 16:22:40 adam * New method: apduDump - returns information about last incoming APDU. * * Revision 1.22 1996/01/10 09:18:44 adam @@ -138,7 +142,7 @@ typedef struct { typedef struct { int ref_count; - char *cs_type; + char *comstackType; int protocol_type; int failInfo; COMSTACK cs_link;