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

Fix previous overzealous leak fix

Browse Source
This commit is contained in:
Douglas Clowes
2014-03-07 10:28:22 +11:00
parent 012de6d735
commit 4225f79d88
1 changed files with 3 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
site_ansto/ansto_tclmotdriv.c
View File

@ -397,26 +397,25 @@ static int TclSetPar(void *self, SConnection * pCon, char *name,
if (result == NULL) {
pDriv->errorCode = NOTCLRESULT;
free(tclCommand);
free(tclCommandPara);;
free(tclCommandPara);
return HWFault;
}
if (status != TCL_OK) {
pDriv->errorCode = TCLERROR;
strncpy(pDriv->tclError, result, 1023);
free(tclCommand);
free(tclCommandPara);;
free(tclCommandPara);
return HWFault;
} else {
snprintf(pBuffer, 511, "%s.%s = %s", pDriv->motName, name, result);
SCWrite(pCon, pBuffer, eValue);
}
free(tclCommand);
free(tclCommandPara);;
free(tclCommandPara);
return OKOK;
} else {
pDriv->errorCode = PARANOTFOUND;
free(tclCommand);
free(tclCommandPara);;
return 0;
}