【入門】CommonLisp【質問よろず】at TECH
【入門】CommonLisp【質問よろず】
- 暇つぶし2ch628:デフォルトの名無しさん
05/10/05 18:07:07
(defun my-reverse (list)
(let ((result '()))
(dolist (x list result)
(if (consp x)
(push (my-reverse x) result)
(push x result)))))
次ページ続きを表示1を表示最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch