Lisp on Rails 第1回

こんばんは!! tahara です。

いま仕事で Ruby on Rails を使っています。 正直 Active Record いいっすねー。 DB いじるには楽です。

くやしいので Common Lisp でそれっぽいのを実装してみます。 Lisp on Rails ですね(何だか以前から聞く言葉のような気もします)。

第1回目の今日は何となく Active Record っぽい雰囲気のような感じだけです。

(eval-when (:compile-toplevel :load-toplevel :execute)
  (setf *connection-spec* '("localhost" "blog_test" "root" ""))
  (setq clsql-sys:*default-database-type* :mysql)
  (establish-connection))

;; レコードの定義
(def-record post)
;; インサート
(save (make-instance 'post :name "名前" :title "タイトル" :content "内容"))
;; 検索
(all post)

ソースはこちらから http://github.com/quek/lisp-on-rails

第2回につづきます