summaryrefslogtreecommitdiffstats
path: root/otherlibs/labltk
diff options
context:
space:
mode:
Diffstat (limited to 'otherlibs/labltk')
-rw-r--r--otherlibs/labltk/support/cltkEval.c1
-rw-r--r--otherlibs/labltk/support/cltkImg.c1
-rw-r--r--otherlibs/labltk/tkanim/tkAnimGIF.c1
3 files changed, 0 insertions, 3 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))))
diff --git a/otherlibs/labltk/tkanim/tkAnimGIF.c b/otherlibs/labltk/tkanim/tkAnimGIF.c
index 1beb81439..d8eb11ebc 100644
--- a/otherlibs/labltk/tkanim/tkAnimGIF.c
+++ b/otherlibs/labltk/tkanim/tkAnimGIF.c
@@ -102,7 +102,6 @@ FileReadGIF(interp, f, fileName, formatString)
char newresbuf[640];
char *imageName;
char *resultptr;
- int prevpos;
int loop = -1;
if((winPtr = Tk_MainWindow(interp)) == NULL){