def test_string(self): x, y = Var('x'), Var('y') eq_(eval(begin(parse_text(dqstring(x), '"2"'), x)), "2") eq_(eval(begin(parse_text(sqstring(y), "'1'"), y)), "1")
def test_string(self): x ,y = Var('x'), Var('y') eq_(eval(begin(parse_text(dqstring(x), '"2"'), x)), "2") eq_(eval(begin(parse_text(sqstring(y), "'1'"), y)), "1")
(sexpression1, sexpression, bracket_expression, punct_expression, sexpression_list, atom, maybe_spaces, eval_parse_result) = vars( 'sexpression1, sexpression, bracket_expression, punct_expression, sexpression_list, ' 'atom, maybe_spaces, eval_parse_result') _ = DummyVar('_') def from_sexp(var): return from_(sexpression_module, var) defines = in_module(sexpression_module, define(atom, function( ([x], integer(x)), ([x], dqstring(x)), ([x], symbol(x)) )), define(bracket_expression, function( ([exp_list], and_p(char('('), spaces0(_), from_sexp(sexpression_list)(exp_list), spaces0(_), char(')'))), ([exp_list], and_p(char('['), spaces0(_), from_sexp(sexpression_list)(exp_list), spaces0(_), char(']'))))), define(punct_expression, function( ([L(quote, exp)], and_p(char("'"), from_sexp(sexpression)(exp))), ([L(quasiquote, exp)], and_p(char("`"), from_sexp(sexpression)(exp))), ([L(unquote_splice, exp)], and_p(literal(",@"), from_sexp(sexpression)(exp))), ([L(unquote, exp)], and_p(char(","), from_sexp(sexpression)(exp))))), define(sexpression_list, function( ([Cons(exp, exp_list)], and_p(from_sexp(sexpression)(exp), from_sexp(maybe_spaces)(), from_sexp(sexpression_list)(exp_list))),