char=? (char=? char1 char2 char3 ...) すべての文字が同じなら #t、そうでなければ #f を返します。引数は 2 つ以上必要です。大文字と小文字は区別されます。 Run(char=? #\a #\a #\a) ; => #t (char=? #\a #\A) ; => #f