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) { if (result == NULL) {
pDriv->errorCode = NOTCLRESULT; pDriv->errorCode = NOTCLRESULT;
free(tclCommand); free(tclCommand);
free(tclCommandPara);; free(tclCommandPara);
return HWFault; return HWFault;
} }
if (status != TCL_OK) { if (status != TCL_OK) {
pDriv->errorCode = TCLERROR; pDriv->errorCode = TCLERROR;
strncpy(pDriv->tclError, result, 1023); strncpy(pDriv->tclError, result, 1023);
free(tclCommand); free(tclCommand);
free(tclCommandPara);; free(tclCommandPara);
return HWFault; return HWFault;
} else { } else {
snprintf(pBuffer, 511, "%s.%s = %s", pDriv->motName, name, result); snprintf(pBuffer, 511, "%s.%s = %s", pDriv->motName, name, result);
SCWrite(pCon, pBuffer, eValue); SCWrite(pCon, pBuffer, eValue);
} }
free(tclCommand); free(tclCommand);
free(tclCommandPara);; free(tclCommandPara);
return OKOK; return OKOK;
} else { } else {
pDriv->errorCode = PARANOTFOUND; pDriv->errorCode = PARANOTFOUND;
free(tclCommand); free(tclCommand);
free(tclCommandPara);;
return 0; return 0;
} }