def sparse_split_test():
eq_(sunparse(sparse("`(1 ,@(2))")), '(~ quasiquote (1 (unquote-splice (2))))')
def sparse_unquote_test():
eq_(sunparse(sparse("`(a ,b)")), '(~ quasiquote (a (unquote b)))')
def sparse_dot_test():
eq_(sunparse(sparse("(1 . 2)")), '(1 . 2)')
def sparse_quote_list_test():
eq_(sunparse(sparse("'(1 2)")), '(~ quote (1 2))')
def sparse_quasiquote_test():
eq_(sunparse(sparse("`(a b)")), '(~ quasiquote (a b))')
def sparse_quote_id_test():
eq_(sunparse(sparse("'x")), '(~ quote x)')
def sparse_quote_num_test():
eq_(sunparse(sparse("'5")), '(~ quote 5)')
def sparse_sunparse_list_test():
eq_(sunparse(sparse('(1 b)')), '(1 b)')
def sparse_sunparse_id_test():
eq_(sunparse(sparse('a')), 'a')
def sparse_sunparse_num_test():
eq_(sunparse(sparse('5')), '5')
