{-# LANGUAGE OverloadedStrings #-} module TestResult (results) where import qualified System.Path.Posix as Posix import qualified System.Path.Windows as Windows import System.Path ((), (<.>)) import Data.Char (toLower) results :: (Posix.AbsRelClass ar) => Char -> Posix.FilePath ar -> [(String, Bool)] results a x = []