2010-06-23 23:03:09 -05:00
|
|
|
|
2011-06-15 13:19:50 -05:00
|
|
|
|
|
|
|
|
|
|
|
// -*- rust -*-
|
2010-06-23 23:03:09 -05:00
|
|
|
fn f(int x) -> int {
|
2011-06-15 13:19:50 -05:00
|
|
|
// log "in f:";
|
|
|
|
|
|
|
|
log x;
|
|
|
|
if (x == 1) {
|
|
|
|
// log "bottoming out";
|
|
|
|
|
|
|
|
ret 1;
|
|
|
|
} else {
|
|
|
|
// log "recurring";
|
|
|
|
|
|
|
|
let int y = x * f(x - 1);
|
|
|
|
// log "returned";
|
|
|
|
|
|
|
|
log y;
|
|
|
|
ret y;
|
|
|
|
}
|
2010-06-23 23:03:09 -05:00
|
|
|
}
|
|
|
|
|
2011-06-15 13:19:50 -05:00
|
|
|
fn main() {
|
|
|
|
assert (f(5) == 120);
|
|
|
|
// log "all done";
|
|
|
|
|
|
|
|
}
|