Fixed a bug

[libfirm] / ir / be / besched_t.h

diff --git a/ir/be/besched_t.h b/ir/be/besched_t.h
index 849ed27..5f9bbb4 100644 (file)
--- a/ir/be/besched_t.h
+++ b/ir/be/besched_t.h
@@ -46,6 +46,25 @@ static INLINE int _sched_get_time_step(const ir_node *irn)
        return get_irn_sched_info(irn)->time_step;
 }
 
+/**
+ * Checks, if a node is to appear in a schedule. Such nodes either
+ * consume real data (mode datab) or produce such.
+ * @param irn The node to check for.
+ * @return 1, if the node consumes/produces data, false if not.
+ */
+static INLINE int to_appear_in_schedule(ir_node *irn)
+{
+  int i, n;
+
+  for(i = 0, n = get_irn_arity(irn); i < n; ++i) {
+    ir_node *op = get_irn_n(irn, i);
+    if(mode_is_datab(get_irn_mode(op)))
+      return 1;
+  }
+
+  return mode_is_datab(get_irn_mode(irn));
+}
+
 /**
  * Check, if an ir_node has a scheduling successor.
  * @param irn The ir node.
@@ -53,7 +72,7 @@ static INLINE int _sched_get_time_step(const ir_node *irn)
  */
 static INLINE int _sched_has_next(const ir_node *irn)
 {
-    const ir_node *block = is_Block(irn) ? irn : get_nodes_block(irn);
+  const ir_node *block = is_Block(irn) ? irn : get_nodes_block(irn);
        const sched_info_t *info = get_irn_sched_info(irn);
        const sched_info_t *block_info = get_irn_sched_info(block);
        return info->list.next != &block_info->list;
@@ -66,7 +85,7 @@ static INLINE int _sched_has_next(const ir_node *irn)
  */
 static INLINE int _sched_has_prev(const ir_node *irn)
 {
-    const ir_node *block = is_Block(irn) ? irn : get_nodes_block(irn);
+  const ir_node *block = is_Block(irn) ? irn : get_nodes_block(irn);
        const sched_info_t *info = get_irn_sched_info(irn);
        const sched_info_t *block_info = get_irn_sched_info(block);
        return info->list.prev != &block_info->list;
@@ -157,8 +176,10 @@ static INLINE void _sched_set_time_stamp(ir_node *irn)
  */
 static INLINE ir_node *_sched_add_before(ir_node *before, ir_node *irn)
 {
-       list_add_tail(&get_irn_sched_info(irn)->list, &get_irn_sched_info(before)->list);
+  sched_info_t *info = get_irn_sched_info(irn);
+       list_add_tail(&info->list, &get_irn_sched_info(before)->list);
   _sched_set_time_stamp(irn);
+  info->scheduled = 1;
        return irn;
 }
 
@@ -170,8 +191,10 @@ static INLINE ir_node *_sched_add_before(ir_node *before, ir_node *irn)
  */
 static INLINE ir_node *_sched_add_after(ir_node *after, ir_node *irn)
 {
-       list_add(&get_irn_sched_info(irn)->list, &get_irn_sched_info(after)->list);
+  sched_info_t *info = get_irn_sched_info(irn);
+       list_add(&info->list, &get_irn_sched_info(after)->list);
   _sched_set_time_stamp(irn);
+  info->scheduled = 1;
        return irn;
 }
 
@@ -182,7 +205,7 @@ static INLINE ir_node *_sched_add_after(ir_node *after, ir_node *irn)
  */
 static INLINE int _sched_is_scheduled(ir_node *irn)
 {
-    return get_irn_sched_info(irn)->scheduled;
+  return get_irn_sched_info(irn)->scheduled;
 }
 
 /**