summaryrefslogtreecommitdiffstats
path: root/otherlibs/labltk/support
diff options
context:
space:
mode:
Diffstat (limited to 'otherlibs/labltk/support')
-rw-r--r--otherlibs/labltk/support/cltkEval.c1
-rw-r--r--otherlibs/labltk/support/cltkImg.c1
2 files changed, 0 insertions, 2 deletions
diff --git a/otherlibs/labltk/support/cltkEval.c b/otherlibs/labltk/support/cltkEval.c
index b31bc1adf..e7fbed879 100644
--- a/otherlibs/labltk/support/cltkEval.c
+++ b/otherlibs/labltk/support/cltkEval.c
@@ -199,7 +199,6 @@ CAMLprim value camltk_tcl_direct_eval(value v)
*/
if (info.proc == NULL) {
Tcl_DString buf;
- char *string;
Tcl_DStringInit(&buf);
Tcl_DStringAppend(&buf, argv[0], -1);
for (i=1; i<size; i++) {
diff --git a/otherlibs/labltk/support/cltkImg.c b/otherlibs/labltk/support/cltkImg.c
index 1debe822e..445338e08 100644
--- a/otherlibs/labltk/support/cltkImg.c
+++ b/otherlibs/labltk/support/cltkImg.c
@@ -81,7 +81,6 @@ camltk_setimgdata_native (value imgname, value pixmap, value x, value y,
{
Tk_PhotoHandle ph;
Tk_PhotoImageBlock pib;
- int code;
#if (TK_MAJOR_VERSION < 8)
if (NULL == (ph = Tk_FindPhoto(String_val(imgname))))