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

Fixed segfault on "sicslist xxx"

Browse Source 
r1727 | ffr | 2007-03-27 12:22:49 +1000 (Tue, 27 Mar 2007) | 2 lines
This commit is contained in:
Ferdi Franceschini
2007-03-27 12:22:49 +10:00
committed by Douglas Clowes
parent d49a7be3bb
commit 86c6d626d0
1 changed files with 6 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
sicslist.c
View File

@@ -26,7 +26,7 @@ static void listAllObjects(SConnection *pCon, SicsInterp *pSics){
pCom = pCom->pNext;
Tcl_DStringAppend(&lst, " ",-1); //ffr "," -> " "
}
//ffr Tcl_DStringAppend(&lst,"ENDLIST",-1);
Tcl_DStringAppend(&lst," ",-1);
SCWrite(pCon,Tcl_DStringValue(&lst), eValue);
Tcl_DStringFree(&lst);
}
@@ -76,7 +76,7 @@ static void listAllObjectData(SConnection *pCon, char *name, pDummy data){
prop = prop->pNext;
}
}
//ffr Tcl_DStringAppend(&lst,"ENDLIST",-1);
Tcl_DStringAppend(&lst," ",-1);
SCWrite(pCon,Tcl_DStringValue(&lst),eValue);
Tcl_DStringFree(&lst);
}
@@ -221,7 +221,7 @@ static void printKeyTypes(SicsInterp *pSics, SConnection *pCon,
}
pCom = pCom->pNext;
}
//ffr LLDstringAppend(list,"ENDLIST");
LLDstringAppend(list," ");
listToString(list,&result);
SCWrite(pCon,Tcl_DStringValue(&result),eValue);
@@ -261,7 +261,7 @@ static void printObjectsMatchingKeyVal(SicsInterp *pSics,
}
pCom = pCom->pNext;
}
//ffr Tcl_DStringAppend(&result,"ENDLIST",-1);
Tcl_DStringAppend(&result," ",-1);
SCWrite(pCon,Tcl_DStringValue(&result),eValue);
Tcl_DStringFree(&result);
}
@@ -375,7 +375,7 @@ static int printServer(SConnection *pCon){
Tcl_DStringAppend(&txt,buffer,-1);
current = current->pNext;
}
//ffr Tcl_DStringAppend(&txt,"ENDLIST",-1);
Tcl_DStringAppend(&txt," ",-1);
SCWrite(pCon,Tcl_DStringValue(&txt),eValue);
Tcl_DStringFree(&txt);
return 1;
@@ -445,7 +445,7 @@ static void printMatch(SConnection *pCon, SicsInterp *pSics,
}
current = current->pNext;
}
//ffr Tcl_DStringAppend(&txt,"ENDLIST",-1);
Tcl_DStringAppend(&txt," ",-1);
SCWrite(pCon,Tcl_DStringValue(&txt), eValue);
Tcl_DStringFree(&txt);
}