CommonLisp Scheme Part13at TECHCommonLisp Scheme Part13 - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このｽﾚｯﾄﾞのURL■項目テキスト550:デフォルトの名無しさん 05/07/08 23:46:19 >>548 (defun p (x) (if (listp x) (mapcan #'p x) (list x))) 551:デフォルトの名無しさん 05/07/08 23:54:24 >>550 ありがとうございます！ mapcanと#の意味がわからないんですけど これはどういうことですか？ 552:デフォルトの名無しさん 05/07/08 23:58:27 >>551 Common Lisp 勉強汁 553:デフォルトの名無しさん 05/07/08 23:59:42 >>551 mapcanはmapcarと同じ動作をした後に各館数の返り血をappendで連結した物を返す関数。 #`はそのシンボルを関数として扱うという意味。 554:デフォルトの名無しさん 05/07/09 00:04:19 >>552-553 よくわかりました。 本当にありがとうございました。 555:デフォルトの名無しさん 05/07/09 00:06:49 >>553 重箱の隅ですまんが append ではなく nconc、#` ではなく #' だね。 556:デフォルトの名無しさん 05/07/09 02:43:36 素人質問への解答乙。 つか、明らかに荒らしだよなこいつの質問は。 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch