remove unused vars in express

src/express/expr.c

@@ -269,7 +269,6 @@ EXPresolve_op_dot(Expression expr,Scope scope)
 
     /* stuff for dealing with select_ */
     int options = 0;
-    Variable tmp;
     char dt;
     struct Symbol_ *where = NULL;
 
@@ -464,7 +463,6 @@ EXPresolve_op_group(Expression expr,Scope scope)
 
 	/* stuff for dealing with select_ */
 	int options = 0;
-	char dt;
 
 	/* op1 is entity expression, op2 is entity */
 	/* could be very impossible to determine except */

src/express/express.c

@@ -657,7 +657,6 @@ static void
 connect_lists(Dictionary modeldict, Schema schema, Linked_List list)
 {
 	Rename *r;
-	Schema ref_schema;
 
 	/* translate symbols to schemas */
 	LISTdo_links(list, l)
@@ -707,8 +706,7 @@ EXPRESSresolve(Express model)
     /* comes first - DEL */
 
     Schema schema;
-    DictionaryEntry de, fg;	/* imaginative, eh? */
-    Rename *r;
+    DictionaryEntry de;	/* imaginative, eh? */
 
     jmp_buf env;
     if (setjmp(env)) return;

src/express/lexact.c

@@ -428,7 +428,7 @@ SCANprocess_string(void)
 int
 SCANprocess_encoded_string(void)
 {
-	char *s, *d;	/* source, destination */
+	char *s;	/* source */
 	int count;
 
 	/* strip off quotes */

src/express/resolve.c

@@ -1256,7 +1256,6 @@ void
 SCOPEresolve_types(Scope s)
 {
 	Variable var;
-	Type type;
 	DictionaryEntry de;
 	Generic x;
 

src/express/type.c

@@ -410,7 +410,6 @@ TYPEget_size(Type type)
     Class	class;
     int		size;
     Expression	upper;
-    Linked_List	list;
     Error	experrc;
 
     class = OBJget_class(type);

src/express/variable.c

@@ -204,7 +204,6 @@ VARinitialize()
 extern char *
 VARget_simple_name(Variable v)
 {
-	char tmp;
 
 	Expression e = VARget_name(v);