- size_t i;
-
- /* must iterate backwards here */
- for (i = get_irp_n_irgs(); i > 0;)
- free_ir_graph(get_irp_irg(--i));
-
- free_type_entities(get_glob_type());
- /* must iterate backwards here */
- for (i = get_irp_n_types(); i > 0;)
- free_type_entities(get_irp_type(--i));
-
- for (i = get_irp_n_types(); i > 0;)
- free_type(get_irp_type(--i));