def test_dots_are_cons(self):
self.assertEqual(
parse("(1 . 2)", ParserConfig({}, True)), [Pair("1", "2")],
)
self.assertEqual(
parse("(1 . (2))", ParserConfig({}, True)), [Pair("1", Pair("2", nil))],
)
def test_parse_basic(self):
self.assertEqual(
parse("(+ 2 (3))", ParserConfig({}, False)),
[Pair("+", Pair("2", Pair(Pair("3", nil), nil)))],
)
self.assertEqual(
parse("(+ 2 [3])", ParserConfig({}, False)),
[Pair("+", Pair("2", Pair(Pair("3", nil), nil)))],
)
self.assertEqual(
parse("1 (2)", ParserConfig({}, False)), ["1", Pair("2", nil)],
)
def test_prefixing(self):
self.assertEqual(
parse("('(1 2) hi)", ParserConfig({"'": "quote"}, False)),
[
Pair(
Pair("quote", Pair(Pair("1", Pair("2", nil)), nil)), Pair("hi", nil)
)
],
)
def test_multi_char_prefix(self):
self.assertEqual(
parse("(,@(1 ,$) ,@hi)", ParserConfig({",@": "unquote-splicing"}, False)),
[
Pair(
Pair("unquote-splicing", Pair(Pair("1", Pair(",$", nil)), nil)),
Pair(Pair("unquote-splicing", Pair("hi", nil)), nil),
)
],
)
def parse_and_rerender(self, string, **kwargs):
return Renderer(**kwargs).render_multiple(
parse(string, ParserConfig({"'", "quote"}, True))
)
def test_unmatched_parens(self):
with self.assertRaises(ValueError):
parse(")", ParserConfig({}, False))
with self.assertRaises(ValueError):
parse("(]", ParserConfig({}, False))
with self.assertRaises(ValueError):
parse("[)", ParserConfig({}, False))
with self.assertRaises(ValueError):
parse("(", ParserConfig({}, False))
with self.assertRaises(ValueError):
parse("(1 .)", ParserConfig({}, True))
with self.assertRaises(ValueError):
parse("(1 ')", ParserConfig({"'": "quote"}, True))