Parsing.TestProgram
type Verbosity = Int Source #
putStrV :: Verbosity -> String -> IO () Source #
mainTest :: (RingP [(category, Any :: Type)], Eq category) => ((category, Any :: Type) -> String) -> (Bool -> token -> Pair [(category, Any :: Type)]) -> (String -> [token]) -> (token -> (Int, Int)) -> (category -> String) -> (category -> [category]) -> IO () Source #
pairs :: [a] -> [(a, a)] Source #
resSz :: Num a => (a, b, a) -> a Source #