diff --git a/README.md b/README.md
index 4f659fc..9b5353b 100644
--- a/README.md
+++ b/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
diff --git a/src/Parser.hs b/src/Parser.hs
index 8d0cc08..6f733bb 100644
--- a/src/Parser.hs
+++ b/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