Beispiel #1
0
object *prepare_apply_operands(object *arguments) {
    if (is_the_empty_list(cdr(arguments))) {
        return car(arguments);
    } else {
        return cons(car(arguments), prepare_apply_operands(cdr(arguments)));
    }
}
Beispiel #2
0
object *apply_operands(object *arguments) {
    return prepare_apply_operands(cdr(arguments));
}
Beispiel #3
0
object *prepare_apply_operands(object *arguments) {
    return is_empty(cdr(arguments)) ?
        car(arguments) :
        cons(car(arguments), prepare_apply_operands(cdr(arguments)));
}