Added static to many static routines

[r567]

ir/debug/dbginfo.c

@@ -35,10 +35,10 @@ dbg_info_merge_sets(ir_node **new_nodes, int n_new_nodes,
 }
 
 
-static void (*__dbg_info_merge_pair)(ir_node *nw, ir_node *old, dbg_action info)
+void (*__dbg_info_merge_pair)(ir_node *nw, ir_node *old, dbg_action info)
      = &dbg_info_merge_pair;
 
-static void (*__dbg_info_merge_sets)(ir_node **new_nodes, int n_new_nodes,
+void (*__dbg_info_merge_sets)(ir_node **new_nodes, int n_new_nodes,
 			      ir_node **old_nodes, int n_old_nodes,
 			      dbg_action info)
      = &dbg_info_merge_sets;

ir/tr/entity.c

@@ -547,7 +547,9 @@ int is_compound_entity(entity *ent) {
 	  is_array_type(t) || is_union_type(t));
 }
 
+/* @@@ not implemnted!!! */
 bool equal_entity(entity *ent1, entity *ent2) {
+  printf(" calling unimplemented equal entity!!! \n");
   return true;
 }
 

ir/tr/type.h

@@ -154,12 +154,12 @@ void        set_type_size(type *tp, int size);
 
 
 unsigned long get_type_visited(type *tp);
-void        set_type_visited(type *tp, unsigned long num);
+void          set_type_visited(type *tp, unsigned long num);
 /* Sets visited field in type to type_visited. */
-void        mark_type_visited(type *tp);
+void          mark_type_visited(type *tp);
 
-void*       get_type_link(type *tp);
-void        set_type_link(type *tp, void *l);
+void*         get_type_link(type *tp);
+void          set_type_link(type *tp, void *l);
 /*****/
 
 /****v* type/visited
@@ -177,9 +177,9 @@ void        set_type_link(type *tp, void *l);
  * SOURCE
  */
 extern unsigned long type_visited;
-void set_master_type_visited(unsigned long val);
+void          set_master_type_visited(unsigned long val);
 unsigned long get_master_type_visited();
-void inc_master_type_visited();
+void          inc_master_type_visited();
 /*****/
 
 /****f* type/is_type

ir/tr/typewalk.c

@@ -35,7 +35,7 @@ typedef struct type_walk_env {
 } type_walk_env;
 
 
-void type_walk_2(type_or_ent *tore,
+static void type_walk_2(type_or_ent *tore,
 	       void (pre)(type_or_ent*, void*),
 	       void (post)(type_or_ent*, void*),
 	       void *env)
@@ -142,7 +142,7 @@ void type_walk_2(type_or_ent *tore,
   return;
 }
 
-void start_type_walk(ir_node *node, void *env) {
+static void start_type_walk(ir_node *node, void *env) {
   void *pre  = ((type_walk_env *)env)->pre;
   void *post = ((type_walk_env *)env)->post;
   void *envi = ((type_walk_env *)env)->env;
@@ -207,10 +207,10 @@ void type_walk_irg (ir_graph *irg,
   return;
 }
 
-void type_walk_s2s_2(type_or_ent *tore,
-		     void (pre)(type_or_ent*, void*),
-		     void (post)(type_or_ent*, void*),
-		     void *env)
+static void type_walk_s2s_2(type_or_ent *tore,
+			    void (pre)(type_or_ent*, void*),
+			    void (post)(type_or_ent*, void*),
+			    void *env)
 {
   int i;
 
@@ -298,11 +298,11 @@ void type_walk_super2sub(void (pre)(type_or_ent*, void*),
 
 /*****************************************************************************/
 
-static
-void type_walk_super_2(type_or_ent *tore,
-		       void (pre)(type_or_ent*, void*),
-		       void (post)(type_or_ent*, void*),
-		       void *env)
+static void
+type_walk_super_2(type_or_ent *tore,
+		  void (pre)(type_or_ent*, void*),
+		  void (post)(type_or_ent*, void*),
+		  void *env)
 {
   int i;
 
@@ -387,10 +387,11 @@ void type_walk_super(void (pre)(type_or_ent*, void*),
 /*****************************************************************************/
 
 
-void class_walk_s2s_2(type *tp,
-		     void (pre)(type*, void*),
-		     void (post)(type*, void*),
-		     void *env)
+static void
+class_walk_s2s_2(type *tp,
+		 void (pre)(type*, void*),
+		 void (post)(type*, void*),
+		 void *env)
 {
   int i;
 

ir/tv/tv.c

@@ -43,9 +43,10 @@
 #include "obst.h"
 #include "ieee754.h"
 #include "tune.h"
-#include "ident_t.h"
+#include "xp_help.h"
 #include "tv_t.h"
 #include "entity_t.h"
+#include "ident_t.h"
 #include "irmode.h"
 
 static struct obstack tv_obst;	/* obstack for all the target values */