Pascal: char -> chr