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

import System.Path.Posix as Path
import Data.Char (toLower)


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