fix warnings

Author: ldeniau

src/mad_node.c

@@ -632,7 +632,7 @@ advance_to_pos(char* table, int* t_pos)
   /* advances current_node to node at t_pos in table */
 {
   struct table* t;
-  int pos, cnt = 0, ret = 0;
+  int cnt = 0, ret = 0;
   mycpy(c_dum->c, table);
   if ((t = find_table(c_dum->c)))
   {

src/mad_spch.c

@@ -5,7 +5,7 @@ static struct table* bb6d_ixy;
 void
 make_bb6d_ixy(int* bb6d_ixy_max_rows)
 {
-  int k, pos;
+  int k;
   struct table* table = find_table("bb6d_ixy");
 
   if (table)

src/mad_str.c

@@ -185,7 +185,7 @@ stolower_nq(char* s)
 }
 
 char*
-strip(char* name)
+strip(const char* name)
   /* strip ':' and following off */
 {
   static char tmp_key[10*NAME_L];

src/mad_str.h

@@ -18,7 +18,7 @@ int   mysplit(char* buf, struct char_p_array* list);
 
 void  conv_char(const char* string, struct int_array* tint);
 void  stolower_nq(char* s);
-char* strip(char* name);
+char* strip(const char* name);      /* warning: use permanent local buffer, make copies! */
 int   supp_lt(char* inbuf, int flag);
 void  supp_mul_char(char c, char* string);
 char* supp_tb(char* string);        /* suppress trailing blanks in string */

src/mad_track.c

@@ -325,7 +325,7 @@ pro_track(struct in_cmd* cmd)
 void
 track_pteigen(double* eigen)
 {
-  int i, j, pos;
+  int i, j;
   struct table* t;
 
   if ((t = find_table("trackone"))) {
@@ -493,7 +493,7 @@ getcurrentcmdname(char* string)
 
 const char* getcurrentelementname()
 {
-/*returns name of the current element 
+/*returns name of the current element
   Used in rviewer plugin
 */