src/test/bench/shootout/binary-trees.rs


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

tag tree {
  nil();
  node(@tree, @tree, int);
}

fn item_check(&tree t) -> int {
  alt (t) {
    case (nil()) {
      ret 0;
    }
    case (node(@tree left, @tree right, int item)) {
      ret item + item_check(left) - item_check(right);
    }
  }
}

fn main() {
}