From: Erwin Janssen <erwinjanssen@outlook.com>
Date: Thu, 1 Sep 2016 20:54:03 +0000 (+0200)
Subject: Resolved 24 warnings in tclpathplan.c
X-Git-Tag: untagged-897b348e31e4e52e8698~1^2
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=4dd2099821e9fde7ce5cc109a0659425443ea1c7;p=graphviz

Resolved 24 warnings in tclpathplan.c

Changed the type of some local variables from `int` to `size_t`.
---

diff --git a/tclpkg/tclpathplan/tclpathplan.c b/tclpkg/tclpathplan/tclpathplan.c
index 3d893217e..308d1f27b 100644
--- a/tclpkg/tclpathplan/tclpathplan.c
+++ b/tclpkg/tclpathplan/tclpathplan.c
@@ -221,7 +221,7 @@ static char *buildBindings(char *s1, char *s2)
  */
 {
     char *s3;
-    int l;
+    size_t l;
 
     if (s2[0] == '+') {
 	if (s1) {
@@ -413,7 +413,7 @@ static int
 vgpanecmd(ClientData clientData, Tcl_Interp * interp, int argc,
 	  char *argv[])
 {
-    int vargc, length, i, j, n, result;
+    int vargc, i, j, n, result;
     char c, *s, **vargv, vbuf[30];
     vgpane_t *vgp, **vgpp;
     point p, q, *ps;
@@ -439,7 +439,7 @@ vgpanecmd(ClientData clientData, Tcl_Interp * interp, int argc,
     vgp = *vgpp;
 
     c = argv[1][0];
-    length = strlen(argv[1]);
+    size_t length = strlen(argv[1]);
 
     if ((c == 'c') && (strncmp(argv[1], "coords", length) == 0)) {
 	if ((argc < 3)) {