*boilerplate

kb 22.01.2013 09:11

should_show_kilobytes =
TestCase (
assertEqual "should_show_kilobytes"
"1K"
(humanReadableFileSize 1024.0))

tests = TestList [
TestLabel "should_show_kilobytes" should_show_kilobytes
]

*boilerplate is used by:

kb

kb