Example #1
0
def test_unparse_int():
    assert_equals("1", unparse(1))
    assert_equals("1337", unparse(1337))
    assert_equals("-42", unparse(-42))
Example #2
0
def test_unparse_quotes():
    assert_equals("''(foo 'bar '(1 2))", unparse(
        ["quote", ["quote", ["foo", ["quote", "bar"], ["quote", [1, 2]]]]]))
Example #3
0
def test_unparse_bool():
    assert_equals("#t", unparse(True))
    assert_equals("#f", unparse(False))
Example #4
0
def test_unparse_atoms():
    assert_equals("123", unparse(123))
    assert_equals("#t", unparse(True))
    assert_equals("#f", unparse(False))
    assert_equals("foo", unparse("foo"))
Example #5
0
def test_unparse_list():
    assert_equals("((foo bar) baz)", unparse([["foo", "bar"], "baz"]))
Example #6
0
def test_unparse_other_quotes():
    assert_equals("'foo", unparse(["quote", "foo"]))
    assert_equals("'(1 2 3)",
                  unparse(["quote", [1, 2, 3]]))
Example #7
0
def test_expand_crazy_quote_combo():
    """TEST 1.14: One final test to see that quote expansion works."""

    source = "'(this ''''(makes ''no) 'sense)"
    assert_equals(source, unparse(parse(source)))
Example #8
0
def test_unparse_symbol():
    assert_equals("+", unparse("+"))
    assert_equals("foo", unparse("foo"))
    assert_equals("lambda", unparse("lambda"))
Example #9
0
def test_unparse_another_list():
    assert_equals("(1 2 3)", unparse([1, 2, 3]))
    assert_equals("(if #t 42 #f)", unparse(["if", True, 42, False]))
Example #10
0
def test_unparse_bool():
    assert_equals("#t", unparse(True))
    assert_equals("#f", unparse(False))
Example #11
0
def test_unparse_int():
    assert_equals("1", unparse(1))
    assert_equals("1337", unparse(1337))
    assert_equals("-42", unparse(-42))
Example #12
0
def test_unparse_quotes():
    assert_equals(
        "''(foo 'bar '(1 2))",
        unparse(
            ["quote", ["quote", ["foo", ["quote", "bar"], ["quote", [1,
                                                                     2]]]]]))
Example #13
0
def test_unparse_list():
    assert_equals("((foo bar) baz)", unparse([["foo", "bar"], "baz"]))
Example #14
0
def test_unparse_atoms():
    assert_equals("123", unparse(123))
    assert_equals("#t", unparse(True))
    assert_equals("#f", unparse(False))
    assert_equals("foo", unparse("foo"))
Example #15
0
def test_unparse_symbol():
    assert_equals("+", unparse("+"))
    assert_equals("foo", unparse("foo"))
    assert_equals("lambda", unparse("lambda"))
Example #16
0
def test_unparse_other_quotes():
    assert_equals("'foo", unparse(["quote", "foo"]))
    assert_equals("'(1 2 3)", unparse(["quote", [1, 2, 3]]))
Example #17
0
def test_unparse_another_list():
    assert_equals("(1 2 3)", unparse([1, 2, 3]))
    assert_equals("(if #t 42 #f)",
                  unparse(["if", True, 42, False]))
Example #18
0
def test_unparse_empty_list():
    assert_equals("()", unparse([]))
Example #19
0
def test_unparse_empty_list():
    assert_equals("()", unparse([]))
Example #20
0
def test_expand_crazy_quote_combo():
    """One final test to see that quote expansion works."""

    source = "'(this ''''(makes ''no) 'sense)"
    assert_equals(source, unparse(parse(source)))