diff --git a/src/MdToHtmlTest.hs b/src/MdToHtmlTest.hs
index d2df2cf..dce1e02 100644
--- a/src/MdToHtmlTest.hs
+++ b/src/MdToHtmlTest.hs
@@ -118,6 +118,17 @@ horizontalRuleTests =
TestList
[check_equal "Horizontal Rule" "
a
b
" (convert "a\n\n---\n\nb")]
+tableTests =
+ TestList
+ [ check_equal
+ "Basic table"
+ "\
+ \Col 1 | Col 2 | Col 3 |
\
+ \Data 1 | Data 2 | Data 3 |
\
+ \More Data 1 | More Data 2 | More Data 3 |
"
+ (convert "| Col 1 | Col 2 | Col 3 |\n|---|---|---|\n| Data 1 | Data 2 | Data 3 |\n| More Data 1 | More Data 2 | More Data 3 |")
+ ]
+
integrationTests =
TestList
[ check_equal "Integration 1" "Sample Markdown
This is some basic, sample markdown.
Second Heading
" (convert "# Sample Markdown\n\n This is some basic, sample markdown.\n\n ## __Second__ _Heading_"),
@@ -157,6 +168,7 @@ tests =
figureTests,
codeTests,
horizontalRuleTests,
+ tableTests,
integrationTests
]