aboutsummaryrefslogtreecommitdiff
path: root/src/test/run-pass/tail-direct.rs
blob: 345a322eb171a8ed11ef7115394b3f4d78d42646 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
// -*- rust -*-

fn main() {
  check(even(42));
  check(odd(45));
}

fn even(int n) -> bool {
  if (n == 0) {
    ret true;
  }
  else {
    be odd(n - 1);
  }
}

fn odd(int n) -> bool {
  if (n == 0) {
    ret false;
  }
  else {
    be even(n - 1);
  }
}