drop some (char*) casts

This commit is contained in:
rlar 2012-02-06 20:23:55 +00:00
parent d04f0948d6
commit bfb8cb259c
2 changed files with 7 additions and 3 deletions

View File

@ -1,3 +1,7 @@
2012-02-06 Robert Larice
* src/tclspice.c :
drop some (char*) casts
2012-02-06 Robert Larice
* src/frontend/vectors.c ,
* src/misc/wlist.c :

View File

@ -255,7 +255,7 @@ static int spice_header TCL_CMDPROCARGS(clientData,interp,argc,argv){
title = cur_run->name;
name = cur_run->type;
sprintf(buf,"{title \"%s\"} {name \"%s\"} {date \"%s\"} {variables %u}",title,name,date,cur_run->numData);
Tcl_AppendResult(interp, (char *)buf,TCL_STATIC);
Tcl_AppendResult(interp, buf, TCL_STATIC);
return TCL_OK;
}else return TCL_ERROR;
}
@ -285,7 +285,7 @@ static int spice_data TCL_CMDPROCARGS(clientData,interp,argc,argv) {
type = SV_VOLTAGE;
sprintf(buf,"{%s %s} ",name,
ft_typenames(type));
Tcl_AppendResult(interp, (char *)buf, TCL_STATIC);
Tcl_AppendResult(interp, buf, TCL_STATIC);
}
return TCL_OK;
}else return TCL_ERROR;
@ -308,7 +308,7 @@ static int spice_data TCL_CMDPROCARGS(clientData,interp,argc,argv) {
type = SV_VOLTAGE;
sprintf(buf,"{%s %s} ",name,
ft_typenames(type));
Tcl_AppendResult(interp, (char *)buf, TCL_STATIC);
Tcl_AppendResult(interp, buf, TCL_STATIC);
}
return TCL_OK;
}