aboutsummaryrefslogtreecommitdiff
path: root/src/test/run-pass/tail-direct.rs
blob: ac29bcad167929d4f0d69e44b191713ea7abff25 (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() {
  assert (even(42));
  assert (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);
  }
}