Lisp Scheme Part17at TECHLisp Scheme Part17 - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このｽﾚｯﾄﾞのURL■項目テキスト900:デフォルトの名無しさん 07/08/02 03:33:44 多くの処理系ではわざわざ定数をsingleにはしないだろうけど、もしそれで高速になるならば しても良いという（コンパイラに対する）ヒントにはなるわな。 （そこまで最適化する処理系は少ないだろうけど） 901:デフォルトの名無しさん 07/08/02 12:37:25 common lisp の処理系で > (hogehoge '#+ 1 '(1 2 3 4)) (2 3 4 5) となる関数は無いでしょうか？ > (mapcar '#+ '(1 1 1 1)'(1 2 3 4)) (2 3 4 5) でもいいんですが、リストの長さが不明な場面なので、 > (mapcar '#+ (make-sequence 'list (length'(1 2 3 4) :initial-element 1))) こういう感じの実装くらいしか思いつきません。 もし標準的な関数があればそちらを使いたいところです。 よろしくおねがいします。 902:デフォルトの名無しさん 07/08/02 12:56:17 足すのが1に決まってるなら (mapcar #'1+ '(1 2 3 4)) 決まってないなら (mapcar #'(lambda (x) (+ x 1)) '(1 2 3 4)) でいいんじゃないの? なにか書いてない他の制限があるなら知らんけど。 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch