Extra logging and another lil test.

2018-06-30 23:20:00 -07:00
parent ab1f5227ba
commit 4fff827338
2 changed files with 22 additions and 0 deletions
@@ -174,6 +174,12 @@ class TestYin(TestMixin, unittest.TestCase):
    # ([...1] -- [a2 ...1] [...3] a1)
    self.assertEqualTypeStructure(infer(*expression), [f])

+  def test_stack_dup_ccons(self):
+    expression = stack, dup, ccons
+    f = ((a1, s1), ((a1, ((a1, s1), (a1, s1))), s1))
+    # (... a1 -- ... [a1 [a1 ...] a1 ...])
+    self.assertEqualTypeStructure(infer(*expression), [f])
+
 ##  def test_(self):
 ##    expression = pop, swap, rolldown, rest, rest, cons, cons
 ##    f =