anchor.diff:      (dsl/from :book)
       (dsl/group-by :name)
       (dsl/having ["count(*) > ?", 2])
  -    (fmt/get-sql))
  +    (fmt/sql))
   ;; => "select name, count(*) from book group by name having (count(*) > ?)"
   ----
   
  
positive.code: (-> (dsl/select-one)
      (dsl/from '("book" "b")
                '("article" "a"))
      (fmt/get-sql))
  ;; => "select 1 from book \"a\", article \"b\""
  ----
  
  
negative.code: (-> (dsl/update :t1)
      (dsl/set :name "foo")
      (dsl/where ["id = ?" 1])
      (fmt/sql))
  ;; => "update t1 set name = ? where (id = ?)"
  ----
  
  