コード例 #1
0
ファイル: binding.py プロジェクト: mberkanbicer/serval 
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
ファイル: binding.py プロジェクト: longlongtech/serval 
def binding_values(expr):
    def inner(expr):
        if expr is EmptyList:
            return EmptyList
        return cons(cadar(expr), inner(cdr(expr)))

    return inner(cadr(expr))
コード例 #3
0
ファイル: definition.py プロジェクト: longlongtech/serval 
def definition_value(expr):
    if is_symbol(cadr(expr)):
        return caddr(expr)

    return make_lambda(cdadr(expr), cddr(expr))
コード例 #4
0
ファイル: definition.py プロジェクト: longlongtech/serval 
def definition_variable(expr):
    if is_symbol(cadr(expr)):
        return cadr(expr)

    return caadr(expr)
コード例 #5
0
def assignment_variable(expr):
    return cadr(expr)
コード例 #6
0
def lambda_parameters(expr):
    return cadr(expr)
コード例 #7
0
def if_predicate(expr):
    return cadr(expr)
コード例 #8
0
def primitive_implementation(expr):
    return cadr(expr)
コード例 #9
0
def procedure_parameters(expr):
    return cadr(expr)
コード例 #10
0
ファイル: definition.py プロジェクト: mberkanbicer/serval 
def definition_value(expr):
    if is_symbol(cadr(expr)):
        return caddr(expr)

    return make_lambda(cdadr(expr), cddr(expr))
コード例 #11
0
ファイル: definition.py プロジェクト: mberkanbicer/serval 
def definition_variable(expr):
    if is_symbol(cadr(expr)):
        return cadr(expr)

    return caadr(expr)
コード例 #12
0
ファイル: lambdaexpr.py プロジェクト: longlongtech/serval 
def lambda_parameters(expr):
    return cadr(expr)
コード例 #13
0
ファイル: assignment.py プロジェクト: longlongtech/serval 
def assignment_variable(expr):
    return cadr(expr)
コード例 #14
0
ファイル: quote.py プロジェクト: mberkanbicer/serval 
def text_of_quotation(expr):
    return cadr(expr)