Argonne National Laboratory

Experimental Physics and
Industrial Control System

1994  1995  <19961997  1998  1999  2000  2001  2002  2003  2004  2005  2006  2007  2008  2009  2010  2011  2012  2013  2014  2015  2016  2017  2018  2019  2020  Index 1994  1995  <19961997  1998  1999  2000  2001  2002  2003  2004  2005  2006  2007  2008  2009  2010  2011  2012  2013  2014  2015  2016  2017  2018  2019  2020 
<== Date ==> <== Thread ==>

Subject: Re: tcl_et
From: Marty Kraimer <mrk@aps.anl.gov>
To: tech-talk@aps.anl.gov
Date: Thu, 07 Mar 1996 13:49:50 -0600
Thanks you for this message.
I looked at latest source and this fix is already made.
I checked and the change was revision 1.3 committed at 95/10/10 

Marty Kraimer

Diana Kennedy wrote:
> 
> Hi,
> 
>   I don't know who is supporting the tcl_et e1xtension library, but I found
> 2 bugs in etca.c.  I had trouble (pv)linking a DBF_ENUM  database record and
> accessing a DBF_STRING type (via it's tcl variable link) after the (pv)link,
> 
>   For the DBF_STRING case, I would not get the string when reading the record
> using the corresponding pv-tcl variable. For the DBF_ENUM case, I would get a
> segmentation fault just trying to (pv)link.
> 
>   The fix is to remove the indirection of pchandata->tclStr when calling
> Tcl_LinkVar (for both the DBF_STRING and the DBF_ENUM cases).  That is,
> change it to:
> 
> 
> if(ca_field_type(pchandata->chid) == DBF_STRING )
>    Tcl_LinkVar(pchandata->interp,pchandata->pitem->tclname,(char *)&pchandata->tclStr, TCL_LINK_STRING);
> else if(ca_field_type(pchandata->chid) == DBF_ENUM )
>    Tcl_LinkVar(pchandata->interp,pchandata->pitem->tclname,(char *)&pchandata->tclStr, TCL_LINK_STRING);
> else {
>    Tcl_LinkVar(pchandata->interp,pchandata->pitem->tclname,(char *)&pchandata->tclValue, TCL_LINK_DOUBLE);
>    }
> 
> Diana Kennedy


References:
tcl_et Diana Kennedy

Navigate by Date:
Prev: Compressing postscript files. Nick Rees
Next: EPICS ALPHA 3.13 Release Janet B. Anderson
Index: 1994  1995  <19961997  1998  1999  2000  2001  2002  2003  2004  2005  2006  2007  2008  2009  2010  2011  2012  2013  2014  2015  2016  2017  2018  2019  2020 
Navigate by Thread:
Prev: tcl_et Diana Kennedy
Next: Re: ?delay record Ned Arnold
Index: 1994  1995  <19961997  1998  1999  2000  2001  2002  2003  2004  2005  2006  2007  2008  2009  2010  2011  2012  2013  2014  2015  2016  2017  2018  2019  2020 
ANJ, 10 Aug 2010 Valid HTML 4.01! · Home · News · About · Base · Modules · Extensions · Distributions · Download ·
· Search · EPICS V4 · IRMIS · Talk · Bugs · Documents · Links · Licensing ·