parseStmtLine :: Int -> Parser Stmt
parseStmtLine n = setPosition (newPos "1" n 1) >> parseStmt
parseStmtLine :: Int -> Parser Stmt
parseStmtLine n = setPosition (newPos "1" n 1) >> parseStmt
parseStmtLine n = setPosition (newPos "1" n 1) >> parseStmt