makeSuiteData suitename =
  map (\filters -> (TestSuite { suiteName = "suitename",
                                suiteConcurrently = False,
                                suiteOptions = [],
                                suiteTests = suiteTestList },
                    filters))filterOpts
makeSuiteData suitename =
  map (\filters -> (TestSuite { suiteName = "suitename",
                                suiteConcurrently = False,
                                suiteOptions = [],
                                suiteTests = suiteTestList },
                    filters))filterOpts
makeSuiteData suitename =
  map (\filters -> (TestSuite { suiteName = "suitename",
                                suiteConcurrently = False,
                                suiteOptions = [],
                                suiteTests = suiteTestList },
                    filters))filterOpts