- Removed -fwritable-string
This commit is contained in:
@@ -595,7 +595,7 @@ typedef enum {vStart, eRegel, eHalted} eVeloMode;
|
||||
memset(pDorn,0,sizeof(Dornier));
|
||||
|
||||
/* host name */
|
||||
pPtr = Tcl_GetVar2(pTcl,name,"Host",TCL_GLOBAL_ONLY);
|
||||
pPtr = (char *)Tcl_GetVar2(pTcl,name,"Host",TCL_GLOBAL_ONLY);
|
||||
if(!pPtr)
|
||||
{
|
||||
Tcl_AppendResult(pTcl,"ERROR: no hostname found in",name,NULL);
|
||||
@@ -605,7 +605,7 @@ typedef enum {vStart, eRegel, eHalted} eVeloMode;
|
||||
pDorn->pComputer = strdup(pPtr);
|
||||
|
||||
/* port number */
|
||||
pPtr = Tcl_GetVar2(pTcl,name,"Port",TCL_GLOBAL_ONLY);
|
||||
pPtr = (char *)Tcl_GetVar2(pTcl,name,"Port",TCL_GLOBAL_ONLY);
|
||||
if(!pPtr)
|
||||
{
|
||||
Tcl_AppendResult(pTcl,"ERROR: no port number found in",name,NULL);
|
||||
@@ -622,7 +622,7 @@ typedef enum {vStart, eRegel, eHalted} eVeloMode;
|
||||
pDorn->iPort = iVal;
|
||||
|
||||
/* channel number */
|
||||
pPtr = Tcl_GetVar2(pTcl,name,"Channel",TCL_GLOBAL_ONLY);
|
||||
pPtr = (char *)Tcl_GetVar2(pTcl,name,"Channel",TCL_GLOBAL_ONLY);
|
||||
if(!pPtr)
|
||||
{
|
||||
Tcl_AppendResult(pTcl,"ERROR: no channel number found in",name,NULL);
|
||||
@@ -639,7 +639,7 @@ typedef enum {vStart, eRegel, eHalted} eVeloMode;
|
||||
pDorn->iChannel = iVal;
|
||||
|
||||
/* time out. This one gets defaulted when not specified */
|
||||
pPtr = Tcl_GetVar2(pTcl,name,"Timeout",TCL_GLOBAL_ONLY);
|
||||
pPtr = (char *)Tcl_GetVar2(pTcl,name,"Timeout",TCL_GLOBAL_ONLY);
|
||||
if(!pPtr)
|
||||
{
|
||||
pDorn->iTimeOut = 1000;
|
||||
|
||||
Reference in New Issue
Block a user