-/* Initializes the type information module.
- * Generates a type "initial_type" and sets the type of all nodes to this type.
- * Calling set/get_irn_type is invalid before calling init. Requires memory
- * in the order of MIN(<calls to set_irn_type>, #irnodes).
- */
-void init_irtypeinfo(void) {
- int i;
-
- if (!initial_type)
- initial_type = new_type_class(new_id_from_str("initial_type"));
-
- /* We need a new, empty map. */
- if (type_node_map) pmap_destroy(type_node_map);
- type_node_map = pmap_create();
-
- for (i = 0; i < get_irp_n_irgs(); ++i)
- set_irg_typeinfo_state(get_irp_irg(i), irg_typeinfo_none);
+ for (i = 0, n = get_irp_n_irgs(); i < n; ++i)
+ set_irg_typeinfo_state(get_irp_irg(i), ir_typeinfo_none);