T eval_defun(T form, Environment env) { Object name = CADR(form); Object value = mklambda(CADDR(form), CADDDR(form), env); defglobal(name, value); return name; }
Value *eval_lambda(Value *form, Value *env) { Value *lambda_args = CADR(form); Value *lambda_body = CADDR(form); return mklambda(lambda_args, lambda_body, env); }
T eval_lambda(T form, Environment env) { Object args = CADR(form); Object body = CADDR(form); return mklambda(args, body, env); }