Rockingcool/md-to-html
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Renamed Test.hs to MdToHtmlTest.hs so that the filename matches the

Browse Source 
module name; updated blockquote tests; started working on ordered list
tests
This commit is contained in:
Aadhavan Srinivasan
2025-05-09 23:10:04 -05:00
parent 3cd9f24935
commit b00d79b9aa
1 changed files with 6 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/Test.hs → src/MdToHtmlTest.hs
View File

@@ -56,6 +56,11 @@ blockquoteTests =
) )
] ]
orderedListTests =
TestList
[ check_equal "Basic ordered list" "<ol><li>Item 1</li><li>Item 2</li><li>Item 3</li></ol" (convert "1. Item 1\n2. Item2\n3. Item3")
]
integrationTests = integrationTests =
TestList TestList
[ check_equal "Integration 1" "<h1>Sample Markdown</h1><p>This is some basic, sample markdown.</p><h2><b>Second</b> <i>Heading</i></h2>" (convert "# Sample Markdown\n\n This is some basic, sample markdown.\n\n ## __Second__ _Heading_"), [ check_equal "Integration 1" "<h1>Sample Markdown</h1><p>This is some basic, sample markdown.</p><h2><b>Second</b> <i>Heading</i></h2>" (convert "# Sample Markdown\n\n This is some basic, sample markdown.\n\n ## __Second__ _Heading_"),
@@ -73,6 +78,7 @@ tests =
linkTests, linkTests,
escapedCharTests, escapedCharTests,
blockquoteTests, blockquoteTests,
orderedListTests,
integrationTests integrationTests
] ]