@Test
public void testCons1() {
lwriter.writeCons(new Cons("", new Symbol("find-buffer-file-type-coding-system")));
assertEquals("(\"\" . find-buffer-file-type-coding-system)", output.toString());
reset();
lwriter.writeUnknown(new Cons("", new Symbol("find-buffer-file-type-coding-system")));
assertEquals("(\"\" . find-buffer-file-type-coding-system)", output.toString());
}
@Test
public void testDouble1() {
lwriter.writeDouble(10.1d);
assertEquals("10.1", output.toString());
reset();
lwriter.writeUnknown(10.1d);
assertEquals("10.1", output.toString());
}
@Test
public void testInt1() {
lwriter.writeInt(1010);
assertEquals("1010", output.toString());
reset();
lwriter.writeUnknown(1010);
assertEquals("1010", output.toString());
}
@Test
public void testForm1() {
List l = Arrays.asList(new Symbol("message"), "Hello %s", new Symbol("user-full-name"));
lwriter.writeForm(l);
assertEquals("(message \"Hello %s\" user-full-name)", output.toString());
reset();
lwriter.writeUnknown(l);
assertEquals("'(message \"Hello %s\" user-full-name)", output.toString());
}
@Test
public void testMapAlist() {
Map<Object, Object> m = new LinkedHashMap<>();
m.put("foo", new Symbol("bar"));
m.put("baz", new Symbol("quux"));
lwriter.writeAlist(m);
assertEquals("'((\"foo\" . bar) (\"baz\" . quux))", output.toString());
reset();
lwriter.writeUnknown(m);
assertEquals("'((\"foo\" . bar) (\"baz\" . quux))", output.toString());
}
@Test
public void testQuoted1() {
List l = new ArrayList();
l.add(new Symbol("apply"));
l.add(new Quoted(new Symbol("+")));
l.add(1);
l.add(2);
List inner = new ArrayList();
inner.add(3);
inner.add(4);
l.add(new Quoted(inner));
lwriter.writeForm(l);
assertEquals("(apply '+ 1 2 '(3 4))", output.toString());
reset();
lwriter.writeUnknown(l);
assertEquals("'(apply '+ 1 2 '(3 4))", output.toString());
}
