Reader is still broken around lists

List: y)
  (format t "~a ~a" x y)
Reader seems to work. It still takes a \n with, but at least recognizes atoms and lists correctly
Reader works \o/ It could be modified to A) recurse on inner lists B) use something more useful than strings as nodes C) travel whole top-level D) do something