解答・コメントを送る方法
コメントを送るには2つの方法があります。
- 匿名でコメントを書くログインせずにコメントを書くことができます。 名前は「匿名」となります。
- アカウントを作成してコメントを書くアカウントを作成すると、記名での投稿ができます。 また、プロフィールページが作成され、 簡単なプロフィールや 統計情報が表示されるようになります。
投稿ボタンを押す前に以下の文章を確認してください
- 当サイトへの投稿は クリエイティブ・コモンズ・ライセンス BY(表示)および、その解釈に同意するものとみなされます。各ページには下のようにライセンス表示が行われます。
- あなたの投稿したコード・コメント・トピックが再利用・添削されることを望まない場合は、投稿をお控えください。
- 自分が書いていない、ウェブサイトや書籍などからの無断コピーは著作権の侵害です。著作権者の了解を得るか、自分で0から書いてください。
- 著作権の侵害、名誉毀損、など投稿内容に問題がある場合、削除することがあります。
- これらのことにあなたはあらかじめ同意したものとみなされます。
Post comment
Post a comment to the following challenge:
文字コードの変換
(Nested
Flatten)
As a reply to the following comment: kozima: よく知らなかったので調べながら…… ...(#4631) [show]

kozima
#4631()
[
Common Lisp
]
Rating0/0=0.00
よく知らなかったので調べながら……
文字列の変換は shiro さんの #4628 と同様にバイト列の変換にしています。ファイル入出力の際は :external-format を指定することで文字コード指定ができます。
いずれも処理系依存です。CLISP 2.38 で動作確認しました。
;;; 1 (defun sjis-to-euc-jp (bytes) (convert-string-to-bytes (convert-string-from-bytes bytes charset:shift-jis) charset:euc-jp)) ;;; 2 (defun sjis-to-euc-jp-file (from to) (with-open-file (in from :direction :input :external-format charset:shift-jis) (with-open-file (out to :direction :output :external-format charset:euc-jp) (do () ((null (listen in))) (write-line (read-line in) out)))))Rating0/0=0.00-0+
[ reply ]