module Test.Framework.Runners.Console.Colors where

import Text.PrettyPrint.ANSI.Leijen ( green, red, Doc )


colorFail, colorPass :: Doc -> Doc
colorFail :: Doc -> Doc
colorFail = Doc -> Doc
red
colorPass :: Doc -> Doc
colorPass = Doc -> Doc
green

colorPassOrFail :: Bool -> Doc -> Doc
colorPassOrFail :: Bool -> Doc -> Doc
colorPassOrFail Bool
True  = Doc -> Doc
colorPass
colorPassOrFail Bool
False = Doc -> Doc
colorFail