linse/sics
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

corrected bug: core dump when TecsInit fails

Browse Source
This commit is contained in:
cvs
2000-04-06 08:19:31 +00:00
parent 724bfb5a21
commit 8ba6bf7758
2 changed files with 4 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
evcontroller.c
View File

@ -1116,6 +1116,7 @@
pNew = CreateEVController(pDriv,argv[2],&iRet);
if(!pNew)
{
TecsError(pDriv, &iRet, pError, sizeof(pError)-1);
SCWrite(pCon,"ERROR creating Environment Controller",eError);
DeleteEVDriver(pDriv);
return 0;

10
tecsdriv.c
View File

@ -64,11 +64,6 @@
#include "evdriver.i"
/*------------------------- The Driver ------------------------------------*/
pEVDriver CreateTecsDriver(int argc, char *argv[]);
/*-----------------------------------------------------------------------*/
typedef struct {
void *pData;
@ -81,6 +76,7 @@
static time_t lastGet=0;
/*-------------------------------------------------------------------------*/
int TecsWrapper(SConnection *pCon, SicsInterp *pSics, void *pData,
int argc, char *argv[])
{
@ -188,7 +184,7 @@
return 1;
}
/*--------------------------------------------------------------------------*/
static int TecsError(pEVDriver self, int *iCode, char *error, int iErrLen)
int TecsError(pEVDriver self, int *iCode, char *error, int iErrLen)
{
pTecsDriv pMe = NULL;
@ -253,7 +249,7 @@
{
pMe->iLastError = 1; /* severe */
pMe->lastError = ErrMessage;
return 0;
return -1; /* fatal */
}
return 1;
}