write-char

(write-char character &optional stream)

1 文字を標準出力(または指定したストリーム)に書き出し、その文字を返します。どのバックエンドでも 1 文字の文字列を write-string で書き出すため、ファイルストリーム、文字列ストリーム、ソケットハンドルを含め、文字列出力が使える場所ならどこでも動きます。Gray ストリームのインスタンスには rontolisp:stream-write-char を呼びます。関数なので、#'write-char を funcall、apply、mapc に渡せます。

ok