Yakov Fainによる2007年の予測。
視点の違いか、かなり、つまらない未来予測である。 せっかくだから、外れてもいいから面白い予測をすればいいのに。
Common Lispのリーダーマクロを使って、Rubyにしか見えないLispプログラムを書く、 という話。
#@suck-lisp defun fib (n) if (< n 0) (error "oops") elif (= n 0) 0 elif (= n 1) 1 else let x <- (fib (- n 1)) y <- (fib (- n 2)) in (+ x y) end end end defun f (lst) (print-lst lst) end defun print-lst (lst) when lst let x <- (car lst) xs <- (cdr lst) in (print x) (print-lst xs) end end end defun walk (dir) let files <- nil dirs <- (cl-fad:list-directory dir) in (dolist (d dirs) if (cl-fad:directory-exists-p d) (setf files (append files (walk d))) else (push d files) end) files end end defun print-file-list () (loop for e in (walk "./") do (format t "~A~&" e)) end
まあ、確かにリーダーマクロを使えばなんでもありだよね。 が、それを「良いこと」に含めるのに非常に抵抗があるのは、 私だけだろうか。