Add DList tests

gliptak · gliptak · commit f1801d3c4fa3 · 2018-08-21T20:22:54.000-04:00
Signed-off-by: Gábor Lipták &lt;gliptak@gmail.com&gt;
diff --git a/core/src/test/java/fj/data/DListTest.java b/core/src/test/java/fj/data/DListTest.java
@@ -0,0 +1,31 @@
+package fj.data;
+
+import org.junit.Test;
+
+import static fj.data.DList.*;
+import static org.hamcrest.core.Is.is;
+import static org.junit.Assert.assertThat;
+
+public class DListTest {
+    @Test
+    public void testConsSnoc() {
+        assertThat(nil().snoc(2).cons(1).toJavaList(), is(single(1).snoc(2).toJavaList()));
+    }
+
+    @Test
+    public void testListDList() {
+        DList<Integer> d = listDList(List.range(0, 1000));
+        assertThat(d.toJavaList(), is(List.range(0, 1000).toJavaList()));
+    }
+
+    @Test
+    public void testArrayDList() {
+        DList<Integer> d = arrayDList(Array.range(0, 1000).array(Integer[].class));
+        assertThat(d.toJavaList(), is(Array.range(0, 1000).toJavaList()));
+    }
+    @Test
+    public void testIter() {
+        DList<Integer> d = iteratorDList(List.range(0, 1000).iterator());
+        assertThat(d.toJavaList(), is(List.range(0, 1000).toJavaList()));
+    }
+}
