From bfb8cb259c96fdcc03b8fa9b9d68d45fe68060cc Mon Sep 17 00:00:00 2001
From: rlar <rlar>
Date: Mon, 6 Feb 2012 20:23:55 +0000
Subject: [PATCH] drop some (char*) casts

---
 ChangeLog      | 4 ++++
 src/tclspice.c | 6 +++---
 2 files changed, 7 insertions(+), 3 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 7141acfd1..43df8c221 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -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 :
diff --git a/src/tclspice.c b/src/tclspice.c
index 28f2e3f3a..570f3cc8a 100755
--- a/src/tclspice.c
+++ b/src/tclspice.c
@@ -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;
   }