Schedgen
type code_dag_node = {
instr : Linear.instruction; |
delay : int; |
mutable sons : (code_dag_node * int) list; |
mutable date : int; |
mutable length : int; |
mutable ancestors : int; |
mutable emitted_ancestors : int; |
}
class virtual scheduler_generic : object ... end