diff --git a/src/parser/document.rs b/src/parser/document.rs
index 0c7f791..d9571a8 100644
--- a/src/parser/document.rs
+++ b/src/parser/document.rs
@@ -10,6 +10,8 @@ use nom::IResult;
 
 type UnboundMatcher<'r, 's, I, O, E> = dyn Fn(Context<'r, 's>, I) -> IResult<I, O, E>;
 
+// TODO: Implement FromStr for Document
+
 pub fn document(input: &str) -> Res<&str, Vec<Paragraph>> {
     let initial_context: ContextTree<'_, '_> = ContextTree::new();
     let (remaining, tokens) = context_many1(&initial_context, paragraph)(input)?;