object *let_parameters(object *exp) { return bindings_parameters(let_bindings(exp)); }
static pSlipObject let_parameters(pSlip gd, pSlipObject exp) { return bindings_parameters(gd, let_bindings(exp)); }
object *bindings_parameters(object *bindings) { return is_empty(bindings) ? empty_list() : cons(binding_parameter(car(bindings)), bindings_parameters(cdr(bindings))); }
static pSlipObject bindings_parameters(pSlip gd, pSlipObject bindings) { return sIsObject_EmptyList(gd, bindings) ? gd->singleton_EmptyList : cons(gd, binding_parameter(car(bindings)), bindings_parameters(gd, cdr(bindings))); }