第8回KPF発表資料dbexecutor ● dbiのラッパー ● dbiって汎用化されてるけど使いづらい (and-let*([query (dbi-prepare conn "SELECT * FROM users")] [result (dbi-execute query)] [accessor (relation-accessor result)]) (begin0 (map (^[row] `([id . ,(x->integer (accessor row "id"))] [name . ,(accessor row "name")])) result) (dbi-close result))) => (((id . 1) (name . "Alice")) ((id . 2) (name . "Bob")) ...)
