update readme

README.md

@@ -1,3 +1,8 @@
 # Lisp Interpreter
 
-Currently working on lexing Lisp, but this'll be more interesting later I hope.
+## Implemented
+- Lexer
+- Parser
+
+## To Do
+- Actually run lisp code

src/Parser.hs

@@ -42,5 +42,4 @@ recognizeAST' (x:xs) | x == TokRPar = (xs, [ASTErr "Unexpected ')'"])
 
 recognizeAST :: [Token] -> [ASTNode]
 recognizeAST xs = case recognizeAST' xs of
-  ([], ys) -> ys
-  (_, ys) -> ys ++ [ASTErr "Unexpected )"]
+  (_, ys) -> ys