list function has been added

src/main/java/serene/simple/RootScope.java

@@ -44,6 +44,9 @@ public class RootScope extends AScope {
       put("or", new OrFn());
       put("not", new NotFn());
       put("conj", new ConjFn());
+      put("list", new ListFn());
+      // put("let", new LetFn());
+      // put("cond", new CondFn());
       //put("reduce", new ReduceFn());
       put("System", System.class);
       put("Boolean", Boolean.class);

src/main/java/serene/simple/builtin/ListFn.java

@@ -0,0 +1,52 @@
+/**
+ * Serene (simple) - A PoC lisp to collect data on Serenes concepts
+ * Copyright (C) 2019-2020 Sameer Rahmani <lxsameer@gnu.org>
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License
+ * as published by the Free Software Foundation; either version 2
+ * of the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
+ * MA  02110-1301, USA.
+ */
+package serene.simple.builtin;
+
+import java.util.ArrayList;
+import java.util.Collections;
+import java.util.List;
+
+import serene.simple.IScope;
+import serene.simple.ListNode;
+import serene.simple.SereneException;
+
+
+public class ListFn extends AFn {
+  public String fnName() {
+    return "list";
+  };
+
+  public Object eval(IScope scope) throws SereneException{
+    ArrayList<Object> args = (ArrayList<Object>) this.arguments();
+
+    if (args.size() == 0) {
+      return ListNode.EMPTY;
+    }
+
+    ListNode<Object> list = (ListNode<Object>) ListNode.EMPTY;
+    Collections.reverse(args);
+
+    for (Object x : args) {
+      list = new ListNode<Object>(x, list);
+    }
+
+    return list;
+  }
+}