Clojurians Log v2

I did this once before, let me find the code...

(sql/register-clause!
 :create-index
 (fn [_ {idx-name :name
         :keys [unique?
                if-not-exists?
                on-table
                on-field
                using]}]

   [(clojure.string/join
     " "
     ["CREATE"
      (when unique? "UNIQUE")
      "INDEX"
      (when if-not-exists? "IF NOT EXISTS")
      (name idx-name)
      "ON"
      (name on-table)
      "(" (name on-field) ")"
      (when using "USING")
      (when using using)])])

(sql/format {:create-index
              {:if-not-exists? true
               :name "idx_user_lname"
               :on-table :users
               :on-field :lname}})

["CREATE INDEX IF NOT EXISTS idx_user_lname
  ON users ( lname )"]

A bit ugly but works, you're welcome to refactor it

curious about the use case of writing ddl via honeysql. how do you use it?

I use it in the same way as SQL. I just introduced migratus for managing the versioning.

DDL is mostly non-ANSI Standard in practice so each statement tends to vary a lot between dialects. HoneySQL supports the most common "core" DDL -- so there's basic ALTER TABLE / ADD INDEX stuff -- but a lot of each database's DDL is very irregular in structure and hard to model in a data-driven DSL.

Feel free to create an issue on GitHub and I'll see about putting in basic CREATE INDEX (based on the machinery of alter/add I expect).