----------------------------------------------------------------------

main :: IO ()
main =
  mapM_ testIt [("tests/simple.xlsx", simpleExpected),
                ("tests/simple.xls", simpleExpected),
                ("tests/simple.csv", simpleExpectedCsv),
                ("tests/dates.xlsx", datesExpected),
                ("tests/dates1904.xlsx", dates1904Expected)
                ]
  where
    testIt (source, expected) = testSimple source expected

----------------------------------------------------------------------
main :: IO ()
main =
  mapM_ testIt [("tests/simple.xlsx", simpleExpected),
                ("tests/simple.xls", simpleExpected),
                ("tests/simple.csv", simpleExpectedCsv),
                ("tests/dates.xlsx", datesExpected),
                ("tests/dates1904.xlsx", dates1904Expected)
                ]
  where
    testIt (source, expected) = testSimple source expected

----------------------------------------------------------------------
main =
  mapM_ testIt [("tests/simple.xlsx", simpleExpected),
                ("tests/simple.xls", simpleExpected),
                ("tests/simple.csv", simpleExpectedCsv),
                ("tests/dates.xlsx", datesExpected),
                ("tests/dates1904.xlsx", dates1904Expected)
                ]
  where
    testIt (source, expected) = testSimple source expected

----------------------------------------------------------------------