diff options
Diffstat (limited to 'test')
-rw-r--r-- | test/Tests/Lua.hs | 1 | ||||
-rw-r--r-- | test/lua/test-pandoc-utils.lua | 9 |
2 files changed, 10 insertions, 0 deletions
diff --git a/test/Tests/Lua.hs b/test/Tests/Lua.hs index 57e7c5f0c..956575911 100644 --- a/test/Tests/Lua.hs +++ b/test/Tests/Lua.hs @@ -102,6 +102,7 @@ tests = map (localOption (QuickCheckTests 20)) , plain (str "read: OK") , plain (str "failing read: OK") , plain (str "stringify: OK") + , plain (str "to_roman_numeral: OK") ]) ] diff --git a/test/lua/test-pandoc-utils.lua b/test/lua/test-pandoc-utils.lua index ce3456d5d..0a7aedbfd 100644 --- a/test/lua/test-pandoc-utils.lua +++ b/test/lua/test-pandoc-utils.lua @@ -64,6 +64,14 @@ function test_stringify () return utils.stringify(inline) == 'Cogito ergo sum.' end +-- to_roman_numeral +------------------------------------------------------------------------ +function test_to_roman_numeral () + return utils.to_roman_numeral(1888) == 'MDCCCLXXXVIII' + -- calling with a string fails + and not pcall(utils.to_roman_numeral, 'not a number') +end + -- Return result ------------------------------------------------------------------------ function run(fn) @@ -78,5 +86,6 @@ function Para (el) pandoc.Plain{pandoc.Str("read: " .. run(test_read))}, pandoc.Plain{pandoc.Str("failing read: " .. run(test_failing_read))}, pandoc.Plain{pandoc.Str("stringify: " .. run(test_stringify))}, + pandoc.Plain{pandoc.Str("to_roman_numeral: " .. run(test_to_roman_numeral))}, } end |