X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=rmac;a=blobdiff_plain;f=expr.c;h=debcd8884d06915ad75b007ccc72866265407081;hp=b7bf4b1a95b1237a244a8ae12ff619255b4cdaa1;hb=ff2052bcaa1428a33a202822a81a6f9b8e567ef4;hpb=052be802baa4836564801c780b1d432cfe17c576

diff --git a/expr.c b/expr.c
index b7bf4b1..debcd88 100644
--- a/expr.c
+++ b/expr.c
@@ -77,14 +77,13 @@ static VALUE str_value(char * p)
 //
 void InitExpression(void)
 {
-	int i;
-	char * p;
-
 	// Initialize token-class table (all set to END)
-	for(i=0; i<256; i++)
+	for(int i=0; i<256; i++)
 		tokenClass[i] = END;
 
-	for(i=0, p=itokcl; *p!=1; p++)
+	int i = 0;
+
+	for(char * p=itokcl; *p!=1; p++)
 	{
 		if (*p == 0)
 			i++;