Parsing.TestProgram

Documentation

type Verbosity = Int

putStrV :: Verbosity -> String -> IO ()

mainTest :: forall category token. (RingP [(category, Any)], Eq category) => ((category, Any) -> String) -> (Bool -> token -> Pair [(category, Any)]) -> (String -> [token]) -> (token -> (Int, Int)) -> (category -> String) -> (category -> [category]) -> IO ()

pairs :: [a] -> [(a, a)]

resSz :: Num a => (a, b, a) -> a