+/** Adds mode to the list of modes in irp. */
+void add_irp_mode(ir_mode *mode);
+
+/* INLINE functions */
+
+static INLINE ir_type *
+_get_glob_type(void) {
+ assert(irp);
+ return irp->glob_type = skip_tid(irp->glob_type);
+}
+
+static INLINE int
+_get_irp_n_irgs(void) {
+ assert (irp && irp->graphs);
+ if (get_visit_pseudo_irgs()) return get_irp_n_allirgs();
+ return ARR_LEN(irp->graphs);
+}
+
+static INLINE ir_graph *
+_get_irp_irg(int pos){
+ if (get_visit_pseudo_irgs()) return get_irp_allirg(pos);
+ assert(0 <= pos && pos <= _get_irp_n_irgs());
+ return irp->graphs[pos];
+}
+
+
+static INLINE int
+_get_irp_n_types (void) {
+ assert (irp && irp->types);
+ return ARR_LEN(irp->types);
+}
+
+static INLINE ir_type *
+_get_irp_type(int pos) {
+ assert (irp && irp->types);
+ /* Don't set the skip_tid result so that no double entries are generated. */
+ return skip_tid(irp->types[pos]);
+}
+
+static INLINE int
+_get_irp_n_modes(void) {
+ assert (irp && irp->modes);
+ return ARR_LEN(irp->modes);
+}
+
+static INLINE ir_mode *
+_get_irp_mode(int pos) {
+ assert (irp && irp->modes);
+ return irp->modes[pos];
+}
+
+static INLINE int
+_get_irp_n_opcodes(void) {
+ assert (irp && irp->opcodes);
+ return ARR_LEN(irp->opcodes);
+}
+
+static INLINE ir_op *
+_get_irp_opcode(int pos) {
+ assert (irp && irp->opcodes);
+ return irp->opcodes[pos];
+}
+
+#ifdef DEBUG_libfirm
+/** Returns a new, unique number to number nodes or the like. */
+static INLINE long
+get_irp_new_node_nr(void) {
+ assert(irp);
+ return irp->max_node_nr++;
+}
+#endif /* DEBUG_libfirm */
+
+static INLINE ir_graph *
+_get_const_code_irg(void) {
+ return irp->const_code_irg;
+}
+
+void set_irp_ip_outedges(ir_node ** ip_outedges);
+ir_node** get_irp_ip_outedges(void);
+
+/** initializes ir_prog. Constructs only the basic lists */
+void init_irprog_1(void);
+
+/** Completes ir_prog. */
+void init_irprog_2(void);
+
+#define get_irp_n_irgs() _get_irp_n_irgs()
+#define get_irp_irg(pos) _get_irp_irg(pos)
+#define get_irp_n_types() _get_irp_n_types()
+#define get_irp_type(pos) _get_irp_type(pos)
+#define get_irp_n_modes() _get_irp_n_modes()
+#define get_irp_mode(pos) _get_irp_mode(pos)
+#define get_irp_n_opcodes() _get_irp_n_opcodes()
+#define get_irp_opcode(pos) _get_irp_opcode(pos)
+#define get_const_code_irg() _get_const_code_irg()
+#define get_glob_type() _get_glob_type()
+