Open singpolyma opened 3 years ago
startOfInput :: Parser t () startOfInput = Parser $ \t pos more lose succ -> if pos == 0 then succ t pos more () else lose t pos more [] "startOfInput"