예제 #1
0
def binding_values(expr):
    def inner(expr):
        if expr is EmptyList:
            return EmptyList
        return cons(cadar(expr), inner(cdr(expr)))

    return inner(cadr(expr))
예제 #2
0
def primitive_implementation(expr):
    return cadr(expr)
예제 #3
0
def procedure_parameters(expr):
    return cadr(expr)
예제 #4
0
def assignment_variable(expr):
    return cadr(expr)
예제 #5
0
def assignment_variable(expr):
    return cadr(expr)
예제 #6
0
def definition_value(expr):
    if is_symbol(cadr(expr)):
        return caddr(expr)

    return make_lambda(cdadr(expr), cddr(expr))
예제 #7
0
def definition_variable(expr):
    if is_symbol(cadr(expr)):
        return cadr(expr)
    
    return caadr(expr)
예제 #8
0
def lambda_parameters(expr):
    return cadr(expr)
예제 #9
0
def definition_value(expr):
    if is_symbol(cadr(expr)):
        return caddr(expr)

    return make_lambda(cdadr(expr), cddr(expr))
예제 #10
0
def definition_variable(expr):
    if is_symbol(cadr(expr)):
        return cadr(expr)

    return caadr(expr)
예제 #11
0
def if_predicate(expr):
    return cadr(expr)
예제 #12
0
def text_of_quotation(expr):
    return cadr(expr)
예제 #13
0
def lambda_parameters(expr):
    return cadr(expr)