@@ -0,0 +1,569 @@
+package magic.ast;%0A%0Aimport magic.data.PersistentHashMap;%0Aimport magic.data.Symbol;%0Aimport magic.lang.Context;%0A%0A/**%0A * Represents a raw form%0A * %0A * @author Mike%0A */%0Apublic class Form extends Node%3CObject%3E %7B%0A%0A%09private Object form;%0A%09%0A%09private Form(Object form) %7B%0A%09%09this.form=form;%0A%09%7D%0A%09%0A%09public Form create(Object form) %7B%0A%09%09return new Form(form);%0A%09%7D%0A%09%0A%09public Object getForm() %7B%0A%09%09return form;%0A%09%7D%0A%09%0A%09@Override%0A%09public Object compute(Context c, PersistentHashMap%3CSymbol, ?%3E bindings) %7B%0A%09%09throw new UnsupportedOperationException(%22Trying to evaluate unexpanded form%22);%0A%09%7D%0A%0A%09%0A%7D%0A

Add Form node