- Removed -fwritable-string

This commit is contained in:
koennecke
2006-03-31 15:25:04 +00:00
parent c7794e1029
commit 78c0e46935
11 changed files with 45 additions and 37 deletions

View File

@ -297,7 +297,7 @@
memset(pNew,0,sizeof(PiPiezo));
/* connection parameters */
pPar = Tcl_GetVar2(pTcl,pArray,"Computer",TCL_GLOBAL_ONLY);
pPar = (char *)Tcl_GetVar2(pTcl,pArray,"Computer",TCL_GLOBAL_ONLY);
if(!pPar)
{
Tcl_SetResult(pTcl,"Failed to find serial port server host name",NULL);
@ -307,7 +307,7 @@
pNew->hostname = strdup(pPar);
pPar = NULL;
pPar = Tcl_GetVar2(pTcl,pArray,"port",TCL_GLOBAL_ONLY);
pPar = (char *)Tcl_GetVar2(pTcl,pArray,"port",TCL_GLOBAL_ONLY);
if(!pPar)
{
Tcl_SetResult(pTcl,"Failed to find serial port server port adress",NULL);
@ -324,7 +324,7 @@
pNew->iPort = iVal;
pPar = NULL;
pPar = Tcl_GetVar2(pTcl,pArray,"channel",TCL_GLOBAL_ONLY);
pPar = (char *)Tcl_GetVar2(pTcl,pArray,"channel",TCL_GLOBAL_ONLY);
if(!pPar)
{
Tcl_SetResult(pTcl,"Failed to find serial port server channel adress",NULL);
@ -341,7 +341,7 @@
pNew->iChannel = iVal;
pPar = NULL;
pPar = Tcl_GetVar2(pTcl,pArray,"motor",TCL_GLOBAL_ONLY);
pPar = (char *)Tcl_GetVar2(pTcl,pArray,"motor",TCL_GLOBAL_ONLY);
if(!pPar)
{
Tcl_SetResult(pTcl,"Failed to find motor number",NULL);