Example #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))
Example #2
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))
Example #3
0
def definition_value(expr):
    if is_symbol(cadr(expr)):
        return caddr(expr)

    return make_lambda(cdadr(expr), cddr(expr))
Example #4
0
def definition_variable(expr):
    if is_symbol(cadr(expr)):
        return cadr(expr)

    return caadr(expr)
Example #5
0
def assignment_variable(expr):
    return cadr(expr)
Example #6
0
def lambda_parameters(expr):
    return cadr(expr)
Example #7
0
def if_predicate(expr):
    return cadr(expr)
Example #8
0
def primitive_implementation(expr):
    return cadr(expr)
Example #9
0
def procedure_parameters(expr):
    return cadr(expr)
Example #10
0
def definition_value(expr):
    if is_symbol(cadr(expr)):
        return caddr(expr)

    return make_lambda(cdadr(expr), cddr(expr))
Example #11
0
def definition_variable(expr):
    if is_symbol(cadr(expr)):
        return cadr(expr)

    return caadr(expr)
Example #12
0
def lambda_parameters(expr):
    return cadr(expr)
Example #13
0
def assignment_variable(expr):
    return cadr(expr)
Example #14
0
def text_of_quotation(expr):
    return cadr(expr)