1 files changed, 55 insertions, 0 deletions
diff --git a/src/cli/runtime/PersistentList.cs b/src/cli/runtime/PersistentList.cs
new file mode 100644
index 00000000..dbe4412c
--- /dev/null
+++ b/src/cli/runtime/PersistentList.cs
@@ -0,0 +1,55 @@
+/**
+ *   Copyright (c) Rich Hickey. All rights reserved.
+ *   The use and distribution terms for this software are covered by the
+ *   Common Public License 1.0 (http://opensource.org/licenses/cpl.php)
+ *   which can be found in the file CPL.TXT at the root of this distribution.
+ *   By using this software in any fashion, you are agreeing to be bound by
+ * 	 the terms of this license.
+ *   You must not remove this notice, or any other, from this software.
+ **/
+
+using System;
+
+namespace clojure.lang
+{
+
+public class PersistentList : ASeq {
+
+private readonly Object _first;
+private readonly PersistentList _rest;
+private readonly int _count;
+
+public PersistentList(Object first) {
+    this._first = first;
+    this._rest = null;
+
+    this._count = 1;
+}
+
+private PersistentList(Object first, PersistentList rest) {
+    this._first = first;
+    this._rest = rest;
+
+    this._count = 1 + rest.count();
+    this._meta = rest._meta;
+}
+
+override public Object first() {
+    return _first;
+}
+
+override public ISeq rest() {
+    return _rest;
+}
+
+override public int count() {
+    return _count;
+}
+
+override public IPersistentCollection cons(Object o) {
+    return new PersistentList(o,this);
+}
+
+}
+
+}