Fixed Runtime.Reader

Author: hagane

Naggum.Runtime/Reader.cs

@@ -76,21 +76,23 @@ private static Object ReadSymbol(StreamReader reader)
         private static Object ReadList(StreamReader reader)
         {
             bool in_list = true;
+            Stack<Object> list_stack = new Stack<object>();
             Cons list = null;
             while (in_list)
             {
                 var ch = reader.Peek();
                 if (ch < 0) throw new IOException("Unexpected end of stream.");
                 if ((char)ch != ')')
                 {
-                    list = new Cons(ReadObject(reader), list);
+                    list_stack.Push(ReadObject(reader));
                 }
                 else
                 {
                     reader.Read(); //consume closing paren
                     in_list = false;
                 }
             }
+            list = new Cons(list_stack.Pop(), list);
             return list;
         }