+ir_node *be_new_spill(ir_node *value, ir_node *after)
+{
+ ir_graph *irg = get_irn_irg(value);
+ ir_node *frame = get_irg_frame(irg);
+ const arch_register_class_t *cls = arch_get_irn_reg_class(value);
+ const arch_register_class_t *cls_frame = arch_get_irn_reg_class(frame);
+ ir_node *block = get_block(after);
+ ir_node *spill
+ = be_new_Spill(cls, cls_frame, block, frame, value);
+
+ sched_add_after(after, spill);
+ return spill;
+}
+
+ir_node *be_new_reload(ir_node *value, ir_node *spill, ir_node *before)
+{
+ ir_graph *irg = get_irn_irg(value);
+ ir_node *frame = get_irg_frame(irg);
+ ir_node *block = get_block(before);
+ const arch_register_class_t *cls = arch_get_irn_reg_class(value);
+ const arch_register_class_t *cls_frame = arch_get_irn_reg_class(frame);
+ ir_mode *mode = get_irn_mode(value);
+ ir_node *reload;
+
+ assert(be_is_Spill(spill) || is_Phi(spill));
+ assert(get_irn_mode(spill) == mode_M);
+
+ reload = be_new_Reload(cls, cls_frame, block, frame, spill, mode);
+ sched_add_before(before, reload);
+
+ return reload;
+}
+