{-# LANGUAGE OverloadedStrings #-}
module TestResult (results) where

import System.Path
import Data.Char (toLower)


results :: Char -> System.Path.FilePath ar -> [(String, Bool)]
results a x =
  <TESTS_GO_HERE>
  []