Some notes

src/Parser/JSON.md

@@ -168,6 +168,7 @@ object = do
     pairs = do
       first <- keyValue
       rest <- many restKeyValue
+      -- TODO: headTail combinator for this
       pure $ first ::: rest
     occupiedObject : Parser (JSONValue TObject)
     occupiedObject = do