blob: 3f50ccc0502841a2828e17cc53c5b8f94964a5dc (
plain)
1
2
3
4
5
6
7
8
9
|
(ns lezer.db
(:require phel.pdo))
(def conn (pdo/connect "sqlite:test.db"))
(defn initialize-database []
(pdo/exec conn "create table if not exists books (id integer primary key autoincrement, title varchar(255), subtitle varchar(255))")
(pdo/exec conn "create table if not exists authors (id integer primary key autoincrement, name varchar(255))")
(pdo/exec conn "create table if not exists authors_books (author_id integer, book_id integer)"))
|
